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

Clément Stenac's avatar
Clément Stenac committed
40 41
#include <vlc_sout.h>
#include "../stream_output/stream_output.h"
42

Clément Stenac's avatar
Clément Stenac committed
43 44 45
#include <vlc_interface.h>
#include <vlc_url.h>
#include <vlc_charset.h>
46

47 48 49 50
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

51
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
52
 * Local prototypes
53
 *****************************************************************************/
54 55
static void Destructor( input_thread_t * p_input );

56
static  int Run  ( input_thread_t *p_input );
57
static  int RunAndDestroy  ( input_thread_t *p_input );
58

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

static inline int ControlPopNoLock( input_thread_t *, int *, vlc_value_t * );
static void       ControlReduce( input_thread_t * );
68
static bool Control( input_thread_t *, int, vlc_value_t );
69

70 71
static int  UpdateFromAccess( input_thread_t * );
static int  UpdateFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
72

73
static void UpdateItemLength( input_thread_t *, int64_t i_length );
74

75
static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
76 77

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

86 87
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 );
88

89
static void DemuxMeta( input_thread_t *p_input, vlc_meta_t *p_meta, demux_t *p_demux );
90
static void AccessMeta( input_thread_t * p_input, vlc_meta_t *p_meta );
91 92 93
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              int i_new, input_attachment_t **pp_new );

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

131
    /* Allocate descriptor */
132 133
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
                                 VLC_OBJECT_INPUT, input_name );
134
    if( p_input == NULL )
135
        return NULL;
136 137 138 139 140 141

    /* 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 );
142 143 144

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

145 146 147 148 149 150 151
    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
152
    MALLOC_NULL( p_input->p, input_thread_private_t );
Rafaël Carré's avatar
Rafaël Carré committed
153
    memset( p_input->p, 0, sizeof( input_thread_private_t ) );
154 155 156

    /* One "randomly" selected input thread is responsible for computing
     * the global stats. Check if there is already someone doing this */
157
    if( p_input->p_libvlc->p_stats && !b_quick )
158
    {
159
        libvlc_priv_t *priv = libvlc_priv (p_input->p_libvlc);
160
        vlc_mutex_lock( &p_input->p_libvlc->p_stats->lock );
161 162
        if( priv->p_stats_computer == NULL )
            priv->p_stats_computer = p_input;
163
        vlc_mutex_unlock( &p_input->p_libvlc->p_stats->lock );
164 165
    }

166
    p_input->b_preparsing = b_quick;
167
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
168

169
    /* Init events */
170 171 172
    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 );
173
    vlc_event_manager_register_event_type( p_em, vlc_InputSelectedStreamChanged );
174

175
    /* Init Common fields */
176 177
    p_input->b_eof = false;
    p_input->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
178
    p_input->p->i_start = 0;
179
    p_input->i_time  = 0;
Clément Stenac's avatar
Clément Stenac committed
180
    p_input->p->i_stop  = 0;
181
    p_input->p->i_run  = 0;
Clément Stenac's avatar
Clément Stenac committed
182 183 184
    p_input->p->i_title = 0;
    p_input->p->title   = NULL;
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
185
    p_input->i_state = INIT_S;
Clément Stenac's avatar
Clément Stenac committed
186
    p_input->p->i_rate  = INPUT_RATE_DEFAULT;
187 188
    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
189 190
    p_input->p->p_es_out = NULL;
    p_input->p->p_sout  = NULL;
191
    p_input->p->b_out_pace_control = false;
192 193 194
    p_input->i_pts_delay = 0;

    /* Init Input fields */
Pierre's avatar
Pierre committed
195
    vlc_gc_incref( p_item ); /* Released in Destructor() */
Clément Stenac's avatar
Clément Stenac committed
196 197 198 199
    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;
200
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
201 202 203
    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;
204 205 206 207
    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
208 209
    p_input->p->input.i_cr_average = 0;

210
    vlc_mutex_lock( &p_item->lock );
211 212

    if( !p_item->p_stats )
213 214
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
215

216
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
217 218
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
219

220
    /* Init control buffer */
221
    vlc_mutex_init( &p_input->p->lock_control );
Clément Stenac's avatar
Clément Stenac committed
222
    p_input->p->i_control = 0;
223

224
    /* Parse input options */
225
    vlc_mutex_lock( &p_item->lock );
226
    assert( p_item->optflagc == p_item->i_options );
227
    for( i = 0; i < p_item->i_options; i++ )
228 229
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
230
    vlc_mutex_unlock( &p_item->lock );
231

232 233
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
234

235
    /* Create Objects variables for public Get and Set */
236
    input_ControlVarInit( p_input );
237

Clément Stenac's avatar
Clément Stenac committed
238
    p_input->p->input.i_cr_average = var_GetInteger( p_input, "cr-average" );
Gildas Bazin's avatar
Gildas Bazin committed
239

240
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
241
    {
242 243
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
244
        {
245 246 247 248
            /* 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
249
            {
250 251 252 253 254 255 256 257 258 259 260 261 262 263
                 seekpoint_t *p_seekpoint = vlc_seekpoint_New();
                 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 = ',';
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
264
                         p_seekpoint->psz_name = strdup(psz_start + 5);
265 266 267 268 269 270 271
                     }
                     else if( !strncmp( psz_start, "bytes=", 6 ) )
                     {
                         p_seekpoint->i_byte_offset = atoll(psz_start + 6);
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
272 273
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
                                                        1000000;
274 275
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
276
                }
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
277
                msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
278 279 280 281 282
                                  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
283
            }
284
            free( val.psz_string );
Gildas Bazin's avatar
Gildas Bazin committed
285 286 287
        }
    }

288
    /* Remove 'Now playing' info as it is probably outdated */
289
    input_item_SetNowPlaying( p_item, NULL );
290

291 292 293 294
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

295 296 297 298
    /* */
    if( p_sout )
        p_input->p->p_sout = p_sout;

299
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
300
    vlc_mutex_init( &p_input->p->counters.counters_lock );
301

302 303 304
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

305 306 307
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

308 309 310
    return p_input;
}

311 312 313 314
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
315
{
316
    input_thread_private_t *priv = p_input->p;
317

318 319 320 321 322 323
#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

324 325
    vlc_event_manager_fini( &p_input->p->event_manager );

326 327
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
328
#ifdef ENABLE_SOUT
329 330
    if( priv->p_sout )
        sout_DeleteInstance( priv->p_sout );
331
#endif
Pierre's avatar
Pierre committed
332 333
    vlc_gc_decref( p_input->p->input.p_item );

334 335
    vlc_mutex_destroy( &p_input->p->counters.counters_lock );

336 337
    vlc_mutex_destroy( &priv->lock_control );
    free( priv );
338
}
339

340
/**
341 342
 * Initialize an input thread and run it. You will need to monitor the
 * thread to clean up after it is done
343 344 345 346 347 348 349
 *
 * \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 )
350
{
351
    return __input_CreateThreadExtended( p_parent, p_item, NULL, NULL );
352 353
}

354 355 356 357
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
                                              const char *psz_log, sout_instance_t *p_sout )
358
{
359
    input_thread_t *p_input;
360

361
    p_input = Create( p_parent, p_item, psz_log, false, p_sout );
362 363 364
    if( !p_input )
        return NULL;

Sam Hocevar's avatar
Sam Hocevar committed
365
    /* Create thread and wait for its readiness. */
366
    if( vlc_thread_create( p_input, "input", Run,
367
                           VLC_THREAD_PRIORITY_INPUT, true ) )
Michel Kaempf's avatar
Michel Kaempf committed
368
    {
369
        input_ChangeState( p_input, ERROR_S );
370
        msg_Err( p_input, "cannot create input thread" );
371 372
        vlc_object_detach( p_input );
        vlc_object_release( p_input );
373
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
374
    }
375

376
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
377 378
}

379
/**
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
380
 * Initialize an input thread and run it. This thread will clean after itself,
381 382 383 384 385
 * 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 ?
Clément Stenac's avatar
Clément Stenac committed
386
 * \return the input object id if non blocking, an error code else
387
 */
388
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
389
                   bool b_block )
390
{
391
    input_thread_t *p_input;
392

393
    p_input = Create( p_parent, p_item, NULL, false, NULL );
394
    if( !p_input )
395 396
        return VLC_EGENERIC;

397
    if( b_block )
398
    {
399
        RunAndDestroy( p_input );
Clément Stenac's avatar
Clément Stenac committed
400
        return VLC_SUCCESS;
401
    }
402
    else
403
    {
404
        if( vlc_thread_create( p_input, "input", RunAndDestroy,
405
                               VLC_THREAD_PRIORITY_INPUT, true ) )
406
        {
407
            input_ChangeState( p_input, ERROR_S );
408
            msg_Err( p_input, "cannot create input thread" );
409
            vlc_object_release( p_input );
Clément Stenac's avatar
Clément Stenac committed
410
            return VLC_EGENERIC;
411
        }
412
    }
413
    return p_input->i_object_id;
414
}
415

416 417 418 419 420 421 422 423 424 425
/**
 * 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 )
{
426
    input_thread_t *p_input;
427

428
    /* Allocate descriptor */
429
    p_input = Create( p_parent, p_item, NULL, true, NULL );
430 431 432
    if( !p_input )
        return VLC_EGENERIC;

433 434
    if( !Init( p_input ) )
        End( p_input );
435

436 437
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
438 439 440 441

    return VLC_SUCCESS;
}

442 443 444 445 446
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
447
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
Michel Kaempf's avatar
Michel Kaempf committed
448
{
449 450
    vlc_list_t *p_list;
    int i;
451 452 453 454 455 456

    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;

457
    vlc_object_kill( p_obj );
458

459
    p_list = vlc_list_children( p_obj );
460
    for( i = 0; i < p_list->i_count; i++ )
461
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
462
    vlc_list_release( p_list );
463 464 465 466 467 468
}
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 */
469
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
470

471
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
472 473
}

474 475
sout_instance_t * input_DetachSout( input_thread_t *p_input )
{
476 477 478 479
    sout_instance_t *p_sout = p_input->p->p_sout;
    vlc_object_detach( p_sout );
    p_input->p->p_sout = NULL;
    return p_sout;
480 481
}

482
/*****************************************************************************
483
 * Run: main thread loop
484 485
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
486
 *****************************************************************************/
487
static int Run( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
488
{
489
    /* Signal that the thread is launched */
Sam Hocevar's avatar
Sam Hocevar committed
490 491
    vlc_thread_ready( p_input );

492
    if( Init( p_input ) )
493 494
    {
        /* If we failed, wait before we are killed, and exit */
495
        p_input->b_error = true;
496

497
        WaitDie( p_input );
498 499

        /* Tell we're dead */
500
        p_input->b_dead = true;
501

502
        return 0;
503
    }
Michel Kaempf's avatar
Michel Kaempf committed
504

505 506
    MainLoop( p_input );

Clément Stenac's avatar
Clément Stenac committed
507
    if( !p_input->b_eof && !p_input->b_error && p_input->p->input.b_eof )
508 509 510 511
    {
        /* We have finish to demux data but not to play them */
        while( !p_input->b_die )
        {
Clément Stenac's avatar
Clément Stenac committed
512
            if( input_EsOutDecodersEmpty( p_input->p->p_es_out ) )
513 514 515 516 517 518 519 520
                break;

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

            msleep( INPUT_IDLE_SLEEP );
        }

        /* We have finished */
521
        p_input->b_eof = true;
522
        input_ChangeState( p_input, END_S );
523 524
    }

525
    /* Wait until we are asked to die */
526 527
    if( !p_input->b_die )
    {
528
        WaitDie( p_input );
529 530 531 532 533 534 535 536 537
    }

    /* Clean up */
    End( p_input );

    return 0;
}

/*****************************************************************************
538
 * RunAndDestroy: main thread loop
539 540 541
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
542
static int RunAndDestroy( input_thread_t *p_input )
543 544 545 546
{
    /* Signal that the thread is launched */
    vlc_thread_ready( p_input );

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

    MainLoop( p_input );

Clément Stenac's avatar
Clément Stenac committed
552
    if( !p_input->b_eof && !p_input->b_error && p_input->p->input.b_eof )
553
    {
554
        /* We have finished demuxing data but not playing it */
555 556
        while( !p_input->b_die )
        {
Clément Stenac's avatar
Clément Stenac committed
557
            if( input_EsOutDecodersEmpty( p_input->p->p_es_out ) )
558 559 560 561 562 563
                break;

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

            msleep( INPUT_IDLE_SLEEP );
        }
564

565
        /* We have finished */
566
        p_input->b_eof = true;
567 568 569 570 571
    }

    /* Clean up */
    End( p_input );

572
exit:
573
    /* Release memory */
574
    vlc_object_release( p_input );
575 576 577 578 579 580 581 582
    return 0;
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
static void MainLoop( input_thread_t *p_input )
{
583
    int64_t i_start_mdate = mdate();
584
    int64_t i_intf_update = 0;
585
    int i_updates = 0;
586

587 588 589
    /* Stop the timer */
    stats_TimerStop( p_input, STATS_TIMER_INPUT_LAUNCHING );

Clément Stenac's avatar
Clément Stenac committed
590
    while( !p_input->b_die && !p_input->b_error && !p_input->p->input.b_eof )
591
    {
592
        bool b_force_update = false;
593 594 595
        int i_ret;
        int i_type;
        vlc_value_t val;
596

597
        /* Do the read */
598
        if( p_input->i_state != PAUSE_S )
599
        {
600 601 602
            if( ( p_input->p->i_stop > 0 && p_input->i_time >= p_input->p->i_stop ) ||
                ( p_input->p->i_run > 0 && i_start_mdate+p_input->p->i_run < mdate() ) )
                i_ret = 0; /* EOF */
603
            else
604
                i_ret = p_input->p->input.p_demux->pf_demux(p_input->p->input.p_demux);
605

606 607 608
            if( i_ret > 0 )
            {
                /* TODO */
Clément Stenac's avatar
Clément Stenac committed
609 610
                if( p_input->p->input.b_title_demux &&
                    p_input->p->input.p_demux->info.i_update )
611
                {
612
                    i_ret = UpdateFromDemux( p_input );
613
                    b_force_update = true;
614
                }
Clément Stenac's avatar
Clément Stenac committed
615 616 617
                else if( !p_input->p->input.b_title_demux &&
                          p_input->p->input.p_access &&
                          p_input->p->input.p_access->info.i_update )
618
                {
619
                    i_ret = UpdateFromAccess( p_input );
620
                    b_force_update = true;
621 622
                }
            }
623 624

            if( i_ret == 0 )    /* EOF */
625 626
            {
                vlc_value_t repeat;
627

628 629 630 631 632 633
                var_Get( p_input, "input-repeat", &repeat );
                if( repeat.i_int == 0 )
                {
                    /* End of file - we do not set b_die because only the
                     * playlist is allowed to do so. */
                    msg_Dbg( p_input, "EOF reached" );
634
                    p_input->p->input.b_eof = true;
635 636
                }
                else
637
                {
Gildas Bazin's avatar
Gildas Bazin committed
638 639
                    msg_Dbg( p_input, "repeating the same input (%d)",
                             repeat.i_int );
640 641 642 643 644
                    if( repeat.i_int > 0 )
                    {
                        repeat.i_int--;
                        var_Set( p_input, "input-repeat", repeat );
                    }
645

646
                    /* Seek to start title/seekpoint */
Clément Stenac's avatar
Clément Stenac committed
647 648 649
                    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 )
650 651 652 653
                        val.i_int = 0;
                    input_ControlPush( p_input,
                                       INPUT_CONTROL_SET_TITLE, &val );

Clément Stenac's avatar
Clément Stenac committed
654 655
                    val.i_int = p_input->p->input.i_seekpoint_start -
                        p_input->p->input.i_seekpoint_offset;
656 657 658 659 660
                    if( val.i_int > 0 /* TODO: check upper boundary */ )
                        input_ControlPush( p_input,
                                           INPUT_CONTROL_SET_SEEKPOINT, &val );

                    /* Seek to start position */
Clément Stenac's avatar
Clément Stenac committed
661
                    if( p_input->p->i_start > 0 )
662
                    {
Clément Stenac's avatar
Clément Stenac committed
663
                        val.i_time = p_input->p->i_start;
664 665 666 667 668 669 670 671 672
                        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                           &val );
                    }
                    else
                    {
                        val.f_float = 0.0;
                        input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                           &val );
                    }
673 674 675

                    /* */
                    i_start_mdate = mdate();
676 677
                }
            }
678 679
            else if( i_ret < 0 )
            {
680
                p_input->b_error = true;
681
            }
682

Clément Stenac's avatar
Clément Stenac committed
683
            if( i_ret > 0 && p_input->p->i_slave > 0 )
684 685 686
            {
                SlaveDemux( p_input );
            }
687
        }
688
        else
689
        {
690 691 692
            /* Small wait */
            msleep( 10*1000 );
        }
693

694
        /* Handle control */
Clément Stenac's avatar
Clément Stenac committed
695
        vlc_mutex_lock( &p_input->p->lock_control );
696 697 698 699 700
        ControlReduce( p_input );
        while( !ControlPopNoLock( p_input, &i_type, &val ) )
        {
            msg_Dbg( p_input, "control type=%d", i_type );
            if( Control( p_input, i_type, val ) )
701
                b_force_update = true;
702
        }
Clément Stenac's avatar
Clément Stenac committed
703
        vlc_mutex_unlock( &p_input->p->lock_control );
704

705
        if( b_force_update || i_intf_update < mdate() )
706 707 708 709 710
        {
            vlc_value_t val;
            double f_pos;
            int64_t i_time, i_length;
            /* update input status variables */
711
            if( !demux_Control( p_input->p->input.p_demux,
Gildas Bazin's avatar
Gildas Bazin committed
712
                                 DEMUX_GET_POSITION, &f_pos ) )
713 714 715 716
            {
                val.f_float = (float)f_pos;
                var_Change( p_input, "position", VLC_VAR_SETVALUE, &val, NULL );
            }
717
            if( !demux_Control( p_input->p->input.p_demux,
Gildas Bazin's avatar
Gildas Bazin committed
718
                                 DEMUX_GET_TIME, &i_time ) )
719 720 721 722 723
            {
                p_input->i_time = i_time;
                val.i_time = i_time;
                var_Change( p_input, "time", VLC_VAR_SETVALUE, &val, NULL );
            }
724
            if( !demux_Control( p_input->p->input.p_demux,
Gildas Bazin's avatar
Gildas Bazin committed
725
                                 DEMUX_GET_LENGTH, &i_length ) )
726 727 728 729 730
            {
                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 );
731

732
                if( old_val.i_time != val.i_time )
733
                {
734
                    UpdateItemLength( p_input, i_length );
735 736
                }
            }
737

738
            var_SetBool( p_input, "intf-change", true );
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
739
            i_intf_update = mdate() + INT64_C(150000);
740
        }
741 742 743
        /* 150ms * 8 = ~ 1 second */
        if( ++i_updates % 8 == 0 )
        {
Clément Stenac's avatar
Clément Stenac committed
744
            stats_ComputeInputStats( p_input, p_input->p->input.p_item->p_stats );
745
            /* Are we the thread responsible for computing global stats ? */
746
            if( libvlc_priv (p_input->p_libvlc)->p_stats_computer == p_input )
747
            {
748
                stats_ComputeGlobalStats( p_input->p_libvlc,
749
                                          p_input->p_libvlc->p_stats );
750 751
            }
        }
752
    }
753 754
}

755
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
756
{
757
    if( p_input->b_preparsing ) return;
758

759 760 761
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
762
    if( libvlc_stats (p_input) )
763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782
    {
        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;
783
    }
784
}
785

786
#ifdef ENABLE_SOUT
787 788 789 790 791 792 793 794 795
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 ) )
796
    {
797 798
        /* Check the validity of the provided sout */
        if( p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
799
        {
800
            if( strcmp( p_input->p->p_sout->psz_sout, psz ) )
801
            {
802
                msg_Dbg( p_input, "destroying unusable sout" );
803

804 805
                sout_DeleteInstance( p_input->p->p_sout );
                p_input->p->p_sout = NULL;
806
            }
807
        }
808

809 810 811 812 813 814 815 816 817 818 819 820 821
        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
822
            {
823 824 825 826 827
                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
828
            }
829
        }
830
        if( libvlc_stats (p_input) )
831
        {
832 833 834 835 836 837
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
            INIT_COUNTER (sout_sent_bytes, INTEGER, COUNTER );
            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;
838
        }
839
    }
840
    else if( p_input->p->p_sout )
841
    {
842 843 844 845
        msg_Dbg( p_input, "destroying useless sout" );

        sout_DeleteInstance( p_input->p->p_sout );
        p_input->p->p_sout = NULL;
846
    }
847
    free( psz );
848

849 850
    return VLC_SUCCESS;
}
851
#endif
852

853 854 855
static void InitTitle( input_thread_t * p_input )
{
    vlc_value_t val;
856

857
    if( p_input->b_preparsing ) return;
858

859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889
    /* 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 );
    if( val.i_int < 0 ) p_input->i_pts_delay -= (val.i_int * 1000);

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

891 892 893 894 895 896 897
static void StartTitle( input_thread_t * p_input )
{
    double f_fps;
    vlc_value_t val;
    int i, i_delay;
    char *psz;
    char *psz_subtitle;
898
    int64_t i_length;
899

900 901 902
    /* Start title/chapter */

    if( p_input->b_preparsing )
903
    {
904 905
        p_input->p->i_start = 0;
        return;
906
    }
907 908 909 910 911 912 913 914 915 916 917 918

    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
919 920 921
    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" );
922
    i_length = var_GetTime( p_input, "length" );
923
    if( p_input->p->i_run < 0 )