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

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

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

34
#include <ctype.h>
Christophe Mutricy's avatar
Christophe Mutricy committed
35
#include <limits.h>
36
#include <assert.h>
37

38
#include "input_internal.h"
39
#include "event.h"
40
#include "es_out.h"
41
#include "es_out_timeshift.h"
42
#include "access.h"
43
#include "demux.h"
44
#include "stream.h"
45
#include "item.h"
46
#include "ressource.h"
47

Clément Stenac's avatar
Clément Stenac committed
48 49
#include <vlc_sout.h>
#include "../stream_output/stream_output.h"
Sam Hocevar's avatar
 
Sam Hocevar committed
50

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

56 57 58 59
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

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

65 66
static  void *Run            ( vlc_object_t *p_this );
static  void *RunAndDestroy  ( vlc_object_t *p_this );
67

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

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

77
static inline int ControlPopNoLock( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline );
78
static void       ControlReduce( input_thread_t * );
79
static bool Control( input_thread_t *, int, vlc_value_t );
80

81 82 83 84 85
static int  UpdateTitleSeekpointFromAccess( input_thread_t * );
static void UpdateGenericFromAccess( input_thread_t * );

static int  UpdateTitleSeekpointFromDemux( input_thread_t * );
static void UpdateGenericFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
86

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

static input_source_t *InputSourceNew( input_thread_t *);
Laurent Aimar's avatar
 
Laurent Aimar committed
90
static int  InputSourceInit( input_thread_t *, input_source_t *,
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
91
                             const char *, const char *psz_forced_demux );
92
static void InputSourceClean( input_source_t * );
Laurent Aimar's avatar
Laurent Aimar committed
93 94
static void InputSourceMeta( input_thread_t *, input_source_t *, vlc_meta_t * );

95 96
/* TODO */
//static void InputGetAttachments( input_thread_t *, input_source_t * );
97 98
static void SlaveDemux( input_thread_t *p_input );
static void SlaveSeek( input_thread_t *p_input );
99

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

106 107 108
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              int i_new, input_attachment_t **pp_new );

109 110
static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced );

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

113
/*****************************************************************************
114 115
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
116
 *
Laurent Aimar's avatar
Laurent Aimar committed
117
 * XXX Do not forget to update vlc_input.h if you add new variables.
118
 *****************************************************************************/
119
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
120
                               const char *psz_header, bool b_quick,
121
                               input_ressource_t *p_ressource )
Michel Kaempf's avatar
Michel Kaempf committed
122
{
123
    static const char input_name[] = "input";
124
    input_thread_t *p_input = NULL;                 /* thread descriptor */
125 126
    vlc_value_t val;
    int i;
127

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

    /* 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 );
139 140 141

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

142 143 144 145 146 147 148
    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 );

149 150 151
    p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
    if( !p_input->p )
        return NULL;
152 153 154

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

164
    p_input->b_preparsing = b_quick;
165
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
166

167
    /* Init Common fields */
168 169
    p_input->b_eof = false;
    p_input->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
170
    p_input->p->i_start = 0;
171
    p_input->i_time     = 0;
Clément Stenac's avatar
Clément Stenac committed
172
    p_input->p->i_stop  = 0;
173
    p_input->p->i_run   = 0;
Clément Stenac's avatar
Clément Stenac committed
174
    p_input->p->i_title = 0;
175
    p_input->p->title = NULL;
Clément Stenac's avatar
Clément Stenac committed
176
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
177
    p_input->i_state = INIT_S;
178
    p_input->p->i_rate = INPUT_RATE_DEFAULT;
179
    p_input->p->b_recording = false;
180 181
    memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
    TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
182
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
183 184
    p_input->p->p_es_out_display = NULL;
    p_input->p->p_es_out = NULL;
185
    p_input->p->p_sout   = NULL;
186
    p_input->p->b_out_pace_control = false;
187
    p_input->i_pts_delay = 0;
188
    p_input->p->i_cr_average = 0;
189

Pierre's avatar
Pierre committed
190
    vlc_gc_incref( p_item ); /* Released in Destructor() */
191 192 193
    p_input->p->p_item = p_item;

    /* Init Input fields */
Clément Stenac's avatar
Clément Stenac committed
194 195 196
    p_input->p->input.p_access = NULL;
    p_input->p->input.p_stream = NULL;
    p_input->p->input.p_demux  = NULL;
197
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
198 199 200
    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;
201 202 203 204
    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
205

206
    vlc_mutex_lock( &p_item->lock );
207 208

    if( !p_item->p_stats )
209 210
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
211

212
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
213 214
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
215

216
    /* */
217 218 219 220
    if( p_ressource )
        p_input->p->p_ressource = p_ressource;
    else
        p_input->p->p_ressource = input_ressource_New();
221 222
    input_ressource_SetInput( p_input->p->p_ressource, p_input );

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

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

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

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

242
    /* */
243
    p_input->p->i_cr_average = var_GetInteger( p_input, "cr-average" );
Gildas Bazin's avatar
Gildas Bazin committed
244

245
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
246
    {
247 248
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
249
        {
250 251 252 253
            /* 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
254
            {
255
                 seekpoint_t *p_seekpoint;
256 257 258 259 260 261 262 263
                 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 = ',';
264 265

                 p_seekpoint = vlc_seekpoint_New();
266 267 268 269 270
                 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
    input_SendEventMeta( p_input );
298

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

303
    /* */
304
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
305
    vlc_mutex_init( &p_input->p->counters.counters_lock );
306

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

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

313 314 315
    return p_input;
}

316 317 318 319
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
320
{
321
#ifndef NDEBUG
322
    char * psz_name = input_item_GetName( p_input->p->p_item );
323 324 325 326
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

327 328
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
329 330 331 332

    if( p_input->p->p_ressource )
        input_ressource_Delete( p_input->p->p_ressource );

333
    vlc_gc_decref( p_input->p->p_item );
Pierre's avatar
Pierre committed
334

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

337
    vlc_cond_destroy( &p_input->p->wait_control );
338 339
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
340
}
341

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

356 357 358
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
359
                                              const char *psz_log, input_ressource_t *p_ressource )
360
{
361
    input_thread_t *p_input;
362

363
    p_input = Create( p_parent, p_item, psz_log, false, p_ressource );
364 365 366
    if( !p_input )
        return NULL;

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

378
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
379 380
}

381
/**
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
382
 * Initialize an input thread and run it. This thread will clean after itself,
383 384 385 386 387
 * 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 ?
388
 * \return an error code, VLC_SUCCESS on success
389
 */
390
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
391
                   bool b_block )
392
{
393
    input_thread_t *p_input;
394

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

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

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

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

435 436
    if( !Init( p_input ) )
        End( p_input );
437

438 439
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
440 441 442 443

    return VLC_SUCCESS;
}

444 445 446 447 448
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
449 450 451 452 453
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 */
454
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
455

456
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
Sam Hocevar's avatar
 
Sam Hocevar committed
457 458
}

459
input_ressource_t *input_DetachRessource( input_thread_t *p_input )
460
{
461
    assert( p_input->b_dead );
462 463 464 465 466

    input_ressource_t *p_ressource = p_input->p->p_ressource;
    input_ressource_SetInput( p_ressource, NULL );

    p_input->p->p_ressource = NULL;
467
    p_input->p->p_sout = NULL;
468 469

    return p_ressource;
470 471
}

472 473 474 475 476 477 478 479 480 481 482 483
/**
 * Get the item from an input thread
 * FIXME it does not increase ref count of the item.
 * if it is used after p_input is destroyed nothing prevent it from
 * being freed.
 */
input_item_t *input_GetItem( input_thread_t *p_input )
{
    assert( p_input && p_input->p );
    return p_input->p->p_item;
}

Laurent Aimar's avatar
Laurent Aimar committed
484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504
/*****************************************************************************
 * ObjectKillChildrens
 *****************************************************************************/
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
{
    vlc_list_t *p_list;
    int i;

    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;

    vlc_object_kill( p_obj );

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

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

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

522 523
    MainLoop( p_input );

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

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

exit:
532 533 534
    /* Tell we're dead */
    input_SendEventDead( p_input );

535
    vlc_restorecancel( canc );
536
    return NULL;
537 538 539
}

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

549
    if( Init( p_input ) )
550
        goto exit;
551 552 553 554 555 556

    MainLoop( p_input );

    /* Clean up */
    End( p_input );

557
exit:
558
    /* Release memory */
559
    vlc_object_release( p_input );
560 561
    vlc_restorecancel( canc );
    return NULL;
562 563 564 565 566
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
567 568 569 570 571 572

/**
 * 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 )
573
{
574
    int i_ret;
575

576
    *pb_changed = false;
577

578 579 580 581
    if( ( p_input->p->i_stop > 0 && p_input->i_time >= p_input->p->i_stop ) ||
        ( p_input->p->i_run > 0 && *pi_start_mdate+p_input->p->i_run < mdate() ) )
        i_ret = 0; /* EOF */
    else
Laurent Aimar's avatar
Laurent Aimar committed
582
        i_ret = demux_Demux( p_input->p->input.p_demux );
583 584

    if( i_ret > 0 )
Sam Hocevar's avatar
 
Sam Hocevar committed
585
    {
586
        if( p_input->p->input.p_demux->info.i_update )
587
        {
588 589 590 591 592 593
            if( p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromDemux( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromDemux( p_input );
594
        }
595 596
        else if( p_input->p->input.p_access &&
                 p_input->p->input.p_access->info.i_update )
597
        {
598 599 600 601 602 603
            if( !p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromAccess( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromAccess( p_input );
604 605
        }
    }
606

607 608 609 610 611 612
    if( i_ret == 0 )    /* EOF */
    {
        vlc_value_t repeat;

        var_Get( p_input, "input-repeat", &repeat );
        if( repeat.i_int == 0 )
613
        {
614 615 616 617 618 619 620 621
            /* 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;
622

623 624 625
            msg_Dbg( p_input, "repeating the same input (%d)",
                     repeat.i_int );
            if( repeat.i_int > 0 )
626
            {
627 628
                repeat.i_int--;
                var_Set( p_input, "input-repeat", repeat );
629
            }
630

631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646
            /* 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 )
647
            {
648 649 650
                val.i_time = p_input->p->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                   &val );
651
            }
652
            else
653
            {
654 655 656
                val.f_float = 0.0;
                input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                   &val );
657
            }
658

659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679
            /* */
            *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 )
{
680 681 682
    double f_position = 0.0;
    mtime_t i_time = 0;
    mtime_t i_length = 0;
683 684

    /* update input status variables */
685
    if( demux_Control( p_input->p->input.p_demux,
686 687
                       DEMUX_GET_POSITION, &f_position ) )
        f_position = 0.0;
688

689
    if( demux_Control( p_input->p->input.p_demux,
690 691
                       DEMUX_GET_TIME, &i_time ) )
        i_time = 0;
Antoine Cellerier's avatar
Antoine Cellerier committed
692
    p_input->i_time = i_time;
693 694

    if( demux_Control( p_input->p->input.p_demux,
695 696
                       DEMUX_GET_LENGTH, &i_length ) )
        i_length = 0;
697

698
    es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
699 700 701 702 703 704 705

    /* update current bookmark */
    vlc_mutex_lock( &p_input->p->p_item->lock );
    p_input->p->bookmark.i_time_offset = i_time;
    if( p_input->p->input.p_stream )
        p_input->p->bookmark.i_byte_offset = stream_Tell( p_input->p->input.p_stream );
    vlc_mutex_unlock( &p_input->p->p_item->lock );
706 707 708 709 710 711 712 713
}

/**
 * MainLoopStatistic
 * It updates the globals statics
 */
static void MainLoopStatistic( input_thread_t *p_input )
{
714
    stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
715 716 717 718 719 720
    /* 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 );
    }
721
    input_SendEventStatistics( p_input );
722 723 724 725 726 727 728 729 730
}

/**
 * MainLoop
 * The main input loop.
 */
static void MainLoop( input_thread_t *p_input )
{
    mtime_t i_start_mdate = mdate();
731 732
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
733 734 735 736

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

737
    while( vlc_object_alive( p_input ) && !p_input->b_error )
738 739 740 741
    {
        bool b_force_update;
        int i_type;
        vlc_value_t val;
742
        mtime_t i_current;
743
        mtime_t i_deadline;
744
        mtime_t i_wakeup;
745
        bool b_paused;
746

747 748
        /* Demux data */
        b_force_update = false;
749
        i_wakeup = 0;
750 751 752
        /* FIXME if p_input->i_state == PAUSE_S the access/access_demux
         * is paused -> this may cause problem with some of them
         * The same problem can be seen when seeking while paused */
753
        b_paused = p_input->i_state == PAUSE_S &&
754
                   !es_out_GetBuffering( p_input->p->p_es_out );
755 756

        if( !b_paused )
757
        {
758 759 760
            if( !p_input->p->input.b_eof )
            {
                MainLoopDemux( p_input, &b_force_update, &i_start_mdate );
761

762 763 764 765 766 767 768 769 770 771 772
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
            }
            else if( !p_input->b_eof && !es_out_GetEmpty( p_input->p->p_es_out ) )
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
            else
            {
                break;
            }
773
        }
774 775

        /* */
776 777
        do {
            i_deadline = i_wakeup;
778
            if( b_paused )
779 780 781 782 783 784 785 786
                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 );
787

788 789 790 791
                if( Control( p_input, i_type, val ) )
                    b_force_update = true;
            }
            vlc_mutex_unlock( &p_input->p->lock_control );
792

793 794 795 796 797 798 799 800 801 802 803 804 805
            /* 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);
            }
806 807 808 809

            /* Check if i_wakeup is still valid */
            if( i_wakeup != 0 )
            {
810
                mtime_t i_new_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
811 812 813
                if( !i_new_wakeup )
                    i_wakeup = 0;
            }
814
        } while( i_current < i_wakeup );
815
    }
816

817
    if( !p_input->b_error )
818
        input_ChangeState( p_input, END_S );
819 820
}

821
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
822
{
823
    if( p_input->b_preparsing ) return;
824

825 826 827
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
828
    if( libvlc_stats( p_input ) )
829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848
    {
        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;
849
    }
850
}
851

852
#ifdef ENABLE_SOUT
853 854
static int InitSout( input_thread_t * p_input )
{
855 856
    if( p_input->b_preparsing )
        return VLC_SUCCESS;
857 858

    /* Find a usable sout and attach it to p_input */
859
    char *psz = var_GetNonEmptyString( p_input, "sout" );
860
    if( psz && strncasecmp( p_input->p->p_item->psz_uri, "vlc:", 4 ) )
861
    {
862 863
        p_input->p->p_sout  = input_ressource_RequestSout( p_input->p->p_ressource, NULL, psz );
        if( !p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
864
        {
865 866 867 868 869
            input_ChangeState( p_input, ERROR_S );
            msg_Err( p_input, "cannot start stream output instance, " \
                              "aborting" );
            free( psz );
            return VLC_EGENERIC;
870
        }
871
        if( libvlc_stats( p_input ) )
872
        {
873
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
874
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
875 876 877 878
            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;
879
        }
880
    }
881
    else
882
    {
883
        input_ressource_RequestSout( p_input->p->p_ressource, NULL, NULL );
884
    }
885
    free( psz );
886

887 888
    return VLC_SUCCESS;
}
889
#endif
890

891 892
static void InitTitle( input_thread_t * p_input )
{
Laurent Aimar's avatar
Laurent Aimar committed
893
    input_source_t *p_master = &p_input->p->input;
894

Laurent Aimar's avatar
Laurent Aimar committed
895 896
    if( p_input->b_preparsing )
        return;
897

898
    /* Create global title (from master) */
Laurent Aimar's avatar
Laurent Aimar committed
899 900 901 902
    p_input->p->i_title = p_master->i_title;
    p_input->p->title   = p_master->title;
    p_input->p->i_title_offset = p_master->i_title_offset;
    p_input->p->i_seekpoint_offset = p_master->i_seekpoint_offset;
903 904 905 906 907 908 909 910
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
        input_ControlVarTitle( p_input, 0 );
    }

    /* Global flag */
Laurent Aimar's avatar
Laurent Aimar committed
911 912 913
    p_input->b_can_pace_control    = p_master->b_can_pace_control;
    p_input->p->b_can_pause        = p_master->b_can_pause;
    p_input->p->b_can_rate_control = p_master->b_can_rate_control;
914 915 916 917 918 919 920

    /* 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. */
Laurent Aimar's avatar
Laurent Aimar committed
921 922 923
    const int i_desynch = var_GetInteger( p_input, "audio-desync" );
    if( i_desynch < 0 )
        p_input->i_pts_delay -= i_desynch * 1000;
924 925

    /* Update cr_average depending on the caching */
926 927 928 929
    p_input->p->i_cr_average *= (10 * p_input->i_pts_delay / 200000);
    p_input->p->i_cr_average /= 10;
    if( p_input->p->i_cr_average < 10 )
        p_input->p->i_cr_average = 10;
930
}
Gildas Bazin's avatar
 
Gildas Bazin committed
931

932 933 934
static void StartTitle( input_thread_t * p_input )
{
    vlc_value_t val;
935

936 937 938 939 940
    /* Start title/chapter */
    val.i_int = p_input->p->input.i_title_start -
                p_input->p->input.i_title_offset;
    if( val.i_int > 0 && val.i_int < p_input->p->input.i_title )
        input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
Laurent Aimar's avatar
Laurent Aimar committed
941

942 943 944 945 946
    val.i_int = p_input->p->input.i_seekpoint_start -
                p_input->p->input.i_seekpoint_offset;
    if( val.i_int > 0 /* TODO: check upper boundary */ )
        input_ControlPush( p_input, INPUT_CONTROL_SET_SEEKPOINT, &val );

Laurent Aimar's avatar
Laurent Aimar committed
947
    /* Start/stop/run time */
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
948 949 950
    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" );
951
    if( p_input->p->i_run < 0 )
952
    {
Pierre d'Herbemont's avatar