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

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

32
#include <vlc_common.h>
Sam Hocevar's avatar
 
Sam Hocevar committed
33

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"
Sam Hocevar's avatar
 
Sam Hocevar committed
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
#include <vlc_strings.h>
47

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

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

57 58
static  void* Run            ( vlc_object_t *p_this );
static  void* RunAndDestroy  ( vlc_object_t *p_this );
59

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

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

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

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

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

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

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

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

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

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

    /* 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 );
145 146 147

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

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

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

169
    p_input->b_preparsing = b_quick;
170
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
171

172
    /* Init events */
173 174 175
    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 );
176
    vlc_event_manager_register_event_type( p_em, vlc_InputSelectedStreamChanged );
177

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

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

214
    vlc_mutex_lock( &p_item->lock );
215 216

    if( !p_item->p_stats )
217 218
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
219

220
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
221 222
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
223

224
    /* Init control buffer */
225
    vlc_mutex_init( &p_input->p->lock_control );
226
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
227
    p_input->p->i_control = 0;
228

Gildas Bazin's avatar
 
Gildas Bazin committed
229
    /* Parse input options */
230
    vlc_mutex_lock( &p_item->lock );
Pierre d'Herbemont's avatar
Pierre d'Herbemont committed
231
    assert( (int)p_item->optflagc == p_item->i_options );
232
    for( i = 0; i < p_item->i_options; i++ )
233 234
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
235
    vlc_mutex_unlock( &p_item->lock );
Gildas Bazin's avatar
 
Gildas Bazin committed
236

237 238
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
239

240
    /* Create Objects variables for public Get and Set */
241
    input_ControlVarInit( p_input );
242

243 244
    /* */
    p_input->p->pts_adjust.b_auto_adjust = var_GetBool( p_input, "auto-adjust-pts-delay" );
Clément Stenac's avatar
Clément Stenac committed
245
    p_input->p->input.i_cr_average = var_GetInteger( p_input, "cr-average" );
Gildas Bazin's avatar
Gildas Bazin committed
246

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

295
    /* Remove 'Now playing' info as it is probably outdated */
296
    input_item_SetNowPlaying( p_item, NULL );
297

298 299 300 301
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

302 303 304 305
    /* */
    if( p_sout )
        p_input->p->p_sout = p_sout;

306
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
307
    vlc_mutex_init( &p_input->p->counters.counters_lock );
308

309 310 311
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

312 313 314
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

315 316 317
    return p_input;
}

318 319 320 321
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
322
{
323 324 325 326 327 328
#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

329 330
    vlc_event_manager_fini( &p_input->p->event_manager );

331 332
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
333
#ifdef ENABLE_SOUT
334 335
    if( p_input->p->p_sout )
        sout_DeleteInstance( p_input->p->p_sout );
336
#endif
Pierre's avatar
Pierre committed
337 338
    vlc_gc_decref( p_input->p->input.p_item );

339 340
    vlc_mutex_destroy( &p_input->p->counters.counters_lock );

341
    vlc_cond_destroy( &p_input->p->wait_control );
342 343
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
344
}
345

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

360 361 362 363
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
                                              const char *psz_log, sout_instance_t *p_sout )
364
{
365
    input_thread_t *p_input;
366

367
    p_input = Create( p_parent, p_item, psz_log, false, p_sout );
368 369 370
    if( !p_input )
        return NULL;

Sam Hocevar's avatar
Sam Hocevar committed
371
    /* Create thread and wait for its readiness. */
372
    if( vlc_thread_create( p_input, "input", Run,
373
                           VLC_THREAD_PRIORITY_INPUT, false ) )
Michel Kaempf's avatar
Michel Kaempf committed
374
    {
375
        input_ChangeState( p_input, ERROR_S );
376
        msg_Err( p_input, "cannot create input thread" );
377 378
        vlc_object_detach( p_input );
        vlc_object_release( p_input );
379
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
380
    }
381

382
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
383 384
}

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

399
    p_input = Create( p_parent, p_item, NULL, false, NULL );
400
    if( !p_input )
401 402
        return VLC_EGENERIC;

403
    if( b_block )
404
    {
405
        RunAndDestroy( VLC_OBJECT(p_input) );
Clément Stenac's avatar
Clément Stenac committed
406
        return VLC_SUCCESS;
407
    }
408
    else
409
    {
410
        if( vlc_thread_create( p_input, "input", RunAndDestroy,
411
                               VLC_THREAD_PRIORITY_INPUT, false ) )
412
        {
413
            input_ChangeState( p_input, ERROR_S );
414
            msg_Err( p_input, "cannot create input thread" );
415
            vlc_object_release( p_input );
Clément Stenac's avatar
Clément Stenac committed
416
            return VLC_EGENERIC;
417
        }
418
    }
419
    return p_input->i_object_id;
420
}
421

422 423 424 425 426 427 428 429 430 431
/**
 * 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 )
{
432
    input_thread_t *p_input;
433

434
    /* Allocate descriptor */
435
    p_input = Create( p_parent, p_item, NULL, true, NULL );
436 437 438
    if( !p_input )
        return VLC_EGENERIC;

439 440
    if( !Init( p_input ) )
        End( p_input );
441

442 443
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
444 445 446 447

    return VLC_SUCCESS;
}

448 449 450 451 452
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
453
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
Michel Kaempf's avatar
Michel Kaempf committed
454
{
455 456
    vlc_list_t *p_list;
    int i;
457 458 459 460 461 462

    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;

463
    vlc_object_kill( p_obj );
464

465
    p_list = vlc_list_children( p_obj );
466
    for( i = 0; i < p_list->i_count; i++ )
467
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
468
    vlc_list_release( p_list );
469 470 471 472 473 474
}
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 */
475
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
476

477
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
Sam Hocevar's avatar
 
Sam Hocevar committed
478 479
}

480 481
sout_instance_t * input_DetachSout( input_thread_t *p_input )
{
482 483 484 485
    sout_instance_t *p_sout = p_input->p->p_sout;
    vlc_object_detach( p_sout );
    p_input->p->p_sout = NULL;
    return p_sout;
486 487
}

488
/*****************************************************************************
489
 * Run: main thread loop
490 491
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
492
 *****************************************************************************/
493
static void* Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
494
{
495
    input_thread_t *p_input = (input_thread_t *)p_this;
496
    const int canc = vlc_savecancel();
497

498
    if( Init( p_input ) )
Sam Hocevar's avatar
 
Sam Hocevar committed
499 500
    {
        /* If we failed, wait before we are killed, and exit */
501
        WaitDie( p_input );
502
        goto exit;
Sam Hocevar's avatar
 
Sam Hocevar committed
503
    }
Michel Kaempf's avatar
Michel Kaempf committed
504

505 506
    MainLoop( p_input );

507
    /* Wait until we are asked to die */
508
    if( !p_input->b_die )
509
        WaitDie( p_input );
510 511 512

    /* Clean up */
    End( p_input );
513 514 515

exit:
    p_input->b_dead = true;
516
    vlc_restorecancel( canc );
517
    return NULL;
518 519 520
}

/*****************************************************************************
521
 * RunAndDestroy: main thread loop
522 523 524
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
525
static void* RunAndDestroy( vlc_object_t *p_this )
526
{
527
    input_thread_t *p_input = (input_thread_t *)p_this;
528
    const int canc = vlc_savecancel();
529

530
    if( Init( p_input ) )
531
        goto exit;
532 533 534 535 536 537

    MainLoop( p_input );

    /* Clean up */
    End( p_input );

538
exit:
539
    /* Release memory */
540
    vlc_object_release( p_input );
541 542
    vlc_restorecancel( canc );
    return NULL;
543 544 545 546 547
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
548 549 550 551 552 553

/**
 * 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 )
554
{
555
    int i_ret;
556

557
    *pb_changed = false;
558

559 560 561 562 563 564 565
    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 )
Sam Hocevar's avatar
 
Sam Hocevar committed
566
    {
567 568 569 570 571 572 573 574 575 576 577 578 579 580 581
        /* 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;
        }
    }
582

583 584 585 586 587 588
    if( i_ret == 0 )    /* EOF */
    {
        vlc_value_t repeat;

        var_Get( p_input, "input-repeat", &repeat );
        if( repeat.i_int == 0 )
589
        {
590 591 592 593 594 595 596 597
            /* 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;
598

599 600 601
            msg_Dbg( p_input, "repeating the same input (%d)",
                     repeat.i_int );
            if( repeat.i_int > 0 )
602
            {
603 604
                repeat.i_int--;
                var_Set( p_input, "input-repeat", repeat );
605
            }
606

607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622
            /* 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 )
623
            {
624 625 626
                val.i_time = p_input->p->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                   &val );
627
            }
628
            else
629
            {
630 631 632
                val.f_float = 0.0;
                input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                   &val );
633
            }
634

635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 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 );
    }
}

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

    /* 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;
724
        mtime_t i_current;
725
        mtime_t i_deadline;
726

727 728
        /* Demux data */
        b_force_update = false;
729 730
        if( p_input->i_state != PAUSE_S )
            MainLoopDemux( p_input, &b_force_update, &i_start_mdate );
731 732 733 734 735

        /* */
        i_deadline = 0;
        if( p_input->i_state == PAUSE_S )
            i_deadline = __MIN( i_intf_update, i_statistic_update );
736

737
        /* Handle control */
Clément Stenac's avatar
Clément Stenac committed
738
        vlc_mutex_lock( &p_input->p->lock_control );
739
        ControlReduce( p_input );
740
        while( !ControlPopNoLock( p_input, &i_type, &val, i_deadline ) )
741 742 743
        {
            msg_Dbg( p_input, "control type=%d", i_type );
            if( Control( p_input, i_type, val ) )
744
                b_force_update = true;
745
        }
Clément Stenac's avatar
Clément Stenac committed
746
        vlc_mutex_unlock( &p_input->p->lock_control );
747

748 749 750
        /* Update interface and statistics */
        i_current = mdate();
        if( i_intf_update < i_current || b_force_update )
751
        {
752
            MainLoopInterface( p_input );
753
            i_intf_update = i_current + INT64_C(250000);
754
        }
755 756
        if( i_statistic_update < i_current )
        {
757
            MainLoopStatistic( p_input );
758 759
            i_statistic_update = i_current + INT64_C(1000000);
        }
760
    }
761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777

    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 */
        while( !p_input->b_die )
        {
            if( input_EsOutDecodersEmpty( p_input->p->p_es_out ) )
                break;

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

            msleep( INPUT_IDLE_SLEEP );
        }

        /* We have finished */
        input_ChangeState( p_input, END_S );
    }
778 779
}

780
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
781
{
782
    if( p_input->b_preparsing ) return;
783

784 785 786
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
787
    if( libvlc_stats( p_input ) )
788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807
    {
        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;
808
    }
809
}
810

811
#ifdef ENABLE_SOUT
812 813 814 815 816 817 818 819 820
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 ) )
821
    {
822 823
        /* Check the validity of the provided sout */
        if( p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
824
        {
825
            if( strcmp( p_input->p->p_sout->psz_sout, psz ) )
826
            {
827
                msg_Dbg( p_input, "destroying unusable sout" );
828

829 830
                sout_DeleteInstance( p_input->p->p_sout );
                p_input->p->p_sout = NULL;
831
            }
832
        }
833

834 835 836 837 838 839 840 841 842 843 844 845 846
        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
847
            {
848 849 850 851 852
                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
853
            }
854
        }
855
        if( libvlc_stats( p_input ) )
856
        {
857
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
858
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
859 860 861 862
            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;
863
        }
864
    }
865
    else if( p_input->p->p_sout )
866
    {
867 868 869 870
        msg_Dbg( p_input, "destroying useless sout" );

        sout_DeleteInstance( p_input->p->p_sout );
        p_input->p->p_sout = NULL;
871
    }
872
    free( psz );
873

874 875
    return VLC_SUCCESS;
}
876
#endif
877

878 879 880
static void InitTitle( input_thread_t * p_input )
{
    vlc_value_t val;
881

882
    if( p_input->b_preparsing ) return;
883

884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914
    /* 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;
}
Gildas Bazin's avatar
 
Gildas Bazin committed
915

916 917 918 919 920 921 922
static void StartTitle( input_thread_t * p_input )
{
    double f_fps;
    vlc_value_t val;
    int i, i_delay;
    char *psz;
    char *psz_subtitle;
923
    int64_t i_length;
924

925 926 927
    /* Start title/chapter */

    if( p_input->b_preparsing )
928
    {
929 930
        p_input->p->i_start = 0;
        return;
931
    }
932 933 934 935 936 937 938 939 940 941 942 943

    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
944 945 946
    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" );
947
    i_length = var_GetTime( p_input, "length" );
948
    if( p_input->p->i_run < 0 )
949
    {
950 951
        msg_Warn( p_input, "invalid run-time ignored" );
        p_input->p->i_run = 0;
Rafaël Carré's avatar
Rafaël Carré committed
952
    }
953

954
    if( p_input->p->i_start > 0 )
955
    {
956
        if( p_input->p->i_start >= i_length )
957
        {
958
            msg_Warn( p_input, "invalid start-time ignored" );
959
        }
960
        else
961
        {
962
            vlc_value_t s;
963

964
            msg_Dbg( p_input, "starting at time: %ds",
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
965
                              (int)( p_input->p->i_start / INT64_C(1000000) ) );
966

967 968
            s.i_time = p_input->p->i_start;
            input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
969
        }
970 971 972 973 974 975
    }
    if( p_input->p->i_stop > 0 && p_input->p->i_stop <= p_input->p->i_start )
    {
        msg_Warn( p_input, "invalid stop-time ignored" );
        p_input->p->i_stop = 0;
    }
976

977 978 979 980 981 982
    /* Load subtitles */
    /* Get fps and set it if not already set */
    if( !demux_Control( p_input->p->input.p_demux, DEMUX_GET_FPS, &f_fps ) &&
        f_fps > 1.0 )
    {
        float f_requested_fps;
983

984 985
        var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
        var_SetFloat( p_input, "sub-original-fps", f_fps );
Laurent Aimar's avatar
 
Laurent Aimar committed
986

987 988
        f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
        if( f_requested_fps != f_fps )
989
        {
990 991 992
            var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
                                            VLC_VAR_DOINHERIT );
            var_SetFloat( p_input, "sub-fps", f_requested_fps );
993
        }
Pierre d'Herbemont's avatar