git.sesse.net Git - vlc/blob - src/input/input.c

   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  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  23  *****************************************************************************/
  24
  25 /*****************************************************************************
  26  * Preamble
  27  *****************************************************************************/
  28 #ifdef HAVE_CONFIG_H
  29 # include "config.h"
  30 #endif
  31
  32 #include <vlc_common.h>
  33
  34 #include <ctype.h>
  35 #include <limits.h>
  36 #include <assert.h>
  37 #include <errno.h>
  38
  39 #include "input_internal.h"
  40 #include "event.h"
  41 #include "es_out.h"
  42 #include "es_out_timeshift.h"
  43 #include "access.h"
  44 #include "demux.h"
  45 #include "stream.h"
  46 #include "item.h"
  47 #include "resource.h"
  48
  49 #include <vlc_sout.h>
  50 #include "../stream_output/stream_output.h"
  51
  52 #include <vlc_dialog.h>
  53 #include <vlc_url.h>
  54 #include <vlc_charset.h>
  55 #include <vlc_strings.h>
  56
  57 #ifdef HAVE_SYS_STAT_H
  58 #   include <sys/stat.h>
  59 #endif
  60
  61 /*****************************************************************************
  62  * Local prototypes
  63  *****************************************************************************/
  64 static void Destructor( input_thread_t * p_input );
  65
  66 static  void *Run            ( vlc_object_t *p_this );
  67
  68 static input_thread_t * Create  ( vlc_object_t *, input_item_t *,
  69                                   const char *, bool, input_resource_t * );
  70 static  int             Init    ( input_thread_t *p_input );
  71 static void             End     ( input_thread_t *p_input );
  72 static void             MainLoop( input_thread_t *p_input, bool b_interactive );
  73
  74 static void ObjectKillChildrens( input_thread_t *, vlc_object_t * );
  75
  76 static inline int ControlPop( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline );
  77 static void       ControlReduce( input_thread_t * );
  78 static void       ControlRelease( int i_type, vlc_value_t val );
  79 static bool       Control( input_thread_t *, int, vlc_value_t );
  80
  81 static int  UpdateTitleSeekpointFromAccess( input_thread_t * );
  82 static void UpdateGenericFromAccess( input_thread_t * );
  83
  84 static int  UpdateTitleSeekpointFromDemux( input_thread_t * );
  85 static void UpdateGenericFromDemux( input_thread_t * );
  86
  87 static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
  88
  89 static input_source_t *InputSourceNew( input_thread_t *);
  90 static int  InputSourceInit( input_thread_t *, input_source_t *,
  91                              const char *, const char *psz_forced_demux );
  92 static void InputSourceClean( input_source_t * );
  93 static void InputSourceMeta( input_thread_t *, input_source_t *, vlc_meta_t * );
  94
  95 /* TODO */
  96 //static void InputGetAttachments( input_thread_t *, input_source_t * );
  97 static void SlaveDemux( input_thread_t *p_input, bool *pb_demux_polled );
  98 static void SlaveSeek( input_thread_t *p_input );
  99
 100 static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta );
 101 static void InputUpdateMeta( input_thread_t *p_input, vlc_meta_t *p_meta );
 102 static void InputGetExtraFiles( input_thread_t *p_input,
 103                                 int *pi_list, char ***pppsz_list,
 104                                 const char *psz_access, const char *psz_path );
 105
 106 static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
 107                               int i_new, input_attachment_t **pp_new );
 108
 109 static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced );
 110
 111 static void input_ChangeState( input_thread_t *p_input, int i_state ); /* TODO fix name */
 112
 113 /* Do not let a pts_delay from access/demux go beyong 60s */
 114 #define INPUT_PTS_DELAY_MAX INT64_C(60000000)
 115
 116 /**
 117  * Create a new input_thread_t.
 118  *
 119  * You need to call input_Start on it when you are done
 120  * adding callback on the variables/events you want to monitor.
 121  *
 122  * \param p_parent a vlc_object
 123  * \param p_item an input item
 124  * \param psz_log an optional prefix for this input logs
 125  * \param p_resource an optional input ressource
 126  * \return a pointer to the spawned input thread
 127  */
 128
 129 input_thread_t *__input_Create( vlc_object_t *p_parent,
 130                                 input_item_t *p_item,
 131                                 const char *psz_log, input_resource_t *p_resource )
 132 {
 133
 134     return Create( p_parent, p_item, psz_log, false, p_resource );
 135 }
 136
 137 /**
 138  * Create a new input_thread_t and start it.
 139  *
 140  * Provided for convenience.
 141  *
 142  * \see input_Create
 143  */
 144 input_thread_t *__input_CreateAndStart( vlc_object_t *p_parent,
 145                                         input_item_t *p_item, const char *psz_log )
 146 {
 147     input_thread_t *p_input = __input_Create( p_parent, p_item, psz_log, NULL );
 148
 149     if( input_Start( p_input ) )
 150     {
 151         vlc_object_release( p_input );
 152         return NULL;
 153     }
 154     return p_input;
 155 }
 156
 157 /**
 158  * Initialize an input thread and run it until it stops by itself.
 159  *
 160  * \param p_parent a vlc_object
 161  * \param p_item an input item
 162  * \return an error code, VLC_SUCCESS on success
 163  */
 164 int __input_Read( vlc_object_t *p_parent, input_item_t *p_item )
 165 {
 166     input_thread_t *p_input = Create( p_parent, p_item, NULL, false, NULL );
 167     if( !p_input )
 168         return VLC_EGENERIC;
 169
 170     if( !Init( p_input ) )
 171     {
 172         MainLoop( p_input, false );
 173         End( p_input );
 174     }
 175
 176     vlc_object_release( p_input );
 177     return VLC_SUCCESS;
 178 }
 179
 180 /**
 181  * Initialize an input and initialize it to preparse the item
 182  * This function is blocking. It will only accept parsing regular files.
 183  *
 184  * \param p_parent a vlc_object_t
 185  * \param p_item an input item
 186  * \return VLC_SUCCESS or an error
 187  */
 188 int input_Preparse( vlc_object_t *p_parent, input_item_t *p_item )
 189 {
 190     input_thread_t *p_input;
 191
 192     /* Allocate descriptor */
 193     p_input = Create( p_parent, p_item, NULL, true, NULL );
 194     if( !p_input )
 195         return VLC_EGENERIC;
 196
 197     if( !Init( p_input ) )
 198         End( p_input );
 199
 200     vlc_object_release( p_input );
 201
 202     return VLC_SUCCESS;
 203 }
 204
 205 /**
 206  * Start a input_thread_t created by input_Create.
 207  *
 208  * You must not start an already running input_thread_t.
 209  *
 210  * \param the input thread to start
 211  */
 212 int input_Start( input_thread_t *p_input )
 213 {
 214     /* Create thread and wait for its readiness. */
 215     if( vlc_thread_create( p_input, "input", Run,
 216                            VLC_THREAD_PRIORITY_INPUT ) )
 217     {
 218         input_ChangeState( p_input, ERROR_S );
 219         msg_Err( p_input, "cannot create input thread" );
 220         return VLC_EGENERIC;
 221     }
 222     return VLC_SUCCESS;
 223 }
 224
 225 /**
 226  * Request a running input thread to stop and die
 227  *
 228  * b_abort must be true when a user stop is requested and not because you have
 229  * detected an error or an eof. It will be used to properly send the
 230  * INPUT_EVENT_ABORT event.
 231  *
 232  * \param p_input the input thread to stop
 233  * \param b_abort true if the input has been aborted by a user request
 234  */
 235 void input_Stop( input_thread_t *p_input, bool b_abort )
 236 {
 237     /* Set die for input and ALL of this childrens (even (grand-)grand-childrens)
 238      * It is needed here even if it is done in INPUT_CONTROL_SET_DIE handler to
 239      * unlock the control loop */
 240     ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
 241
 242     vlc_mutex_lock( &p_input->p->lock_control );
 243     p_input->p->b_abort |= b_abort;
 244     vlc_mutex_unlock( &p_input->p->lock_control );
 245
 246     input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
 247 }
 248
 249 input_resource_t *input_DetachResource( input_thread_t *p_input )
 250 {
 251     assert( p_input->b_dead );
 252
 253     input_resource_SetInput( p_input->p->p_resource, NULL );
 254
 255     input_resource_t *p_resource = input_resource_Detach( p_input->p->p_resource );
 256     p_input->p->p_sout = NULL;
 257
 258     return p_resource;
 259 }
 260
 261 /**
 262  * Get the item from an input thread
 263  * FIXME it does not increase ref count of the item.
 264  * if it is used after p_input is destroyed nothing prevent it from
 265  * being freed.
 266  */
 267 input_item_t *input_GetItem( input_thread_t *p_input )
 268 {
 269     assert( p_input && p_input->p );
 270     return p_input->p->p_item;
 271 }
 272
 273 /*****************************************************************************
 274  * ObjectKillChildrens
 275  *****************************************************************************/
 276 static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
 277 {
 278     vlc_list_t *p_list;
 279     int i;
 280
 281     /* FIXME ObjectKillChildrens seems a very bad idea in fact */
 282     i = vlc_internals( p_obj )->i_object_type;
 283     if( i == VLC_OBJECT_VOUT ||i == VLC_OBJECT_AOUT ||
 284         p_obj == VLC_OBJECT(p_input->p->p_sout) ||
 285         i == VLC_OBJECT_DECODER )
 286         return;
 287
 288     vlc_object_kill( p_obj );
 289
 290     p_list = vlc_list_children( p_obj );
 291     for( i = 0; i < p_list->i_count; i++ )
 292         ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
 293     vlc_list_release( p_list );
 294 }
 295
 296 /*****************************************************************************
 297  * This function creates a new input, and returns a pointer
 298  * to its description. On error, it returns NULL.
 299  *
 300  * XXX Do not forget to update vlc_input.h if you add new variables.
 301  *****************************************************************************/
 302 static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
 303                                const char *psz_header, bool b_quick,
 304                                input_resource_t *p_resource )
 305 {
 306     static const char input_name[] = "input";
 307     input_thread_t *p_input = NULL;                 /* thread descriptor */
 308     int i;
 309
 310     /* Allocate descriptor */
 311     p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
 312                                  VLC_OBJECT_INPUT, input_name );
 313     if( p_input == NULL )
 314         return NULL;
 315
 316     /* Construct a nice name for the input timer */
 317     char psz_timer_name[255];
 318     char * psz_name = input_item_GetName( p_item );
 319     snprintf( psz_timer_name, sizeof(psz_timer_name),
 320               "input launching for '%s'", psz_name );
 321
 322     msg_Dbg( p_input, "Creating an input for '%s'", psz_name);
 323
 324     free( psz_name );
 325
 326     /* Start a timer to mesure how long it takes
 327      * to launch an input */
 328     stats_TimerStart( p_input, psz_timer_name,
 329         STATS_TIMER_INPUT_LAUNCHING );
 330
 331     p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
 332     if( !p_input->p )
 333         return NULL;
 334
 335     p_input->b_preparsing = b_quick;
 336     p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
 337
 338     /* Init Common fields */
 339     p_input->b_eof = false;
 340     p_input->p->b_can_pace_control = true;
 341     p_input->p->i_start = 0;
 342     p_input->p->i_time  = 0;
 343     p_input->p->i_stop  = 0;
 344     p_input->p->i_run   = 0;
 345     p_input->p->i_title = 0;
 346     p_input->p->title = NULL;
 347     p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
 348     p_input->p->i_state = INIT_S;
 349     p_input->p->i_rate = INPUT_RATE_DEFAULT;
 350     p_input->p->b_recording = false;
 351     memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
 352     TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
 353     TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
 354     p_input->p->p_es_out_display = NULL;
 355     p_input->p->p_es_out = NULL;
 356     p_input->p->p_sout   = NULL;
 357     p_input->p->b_out_pace_control = false;
 358
 359     vlc_gc_incref( p_item ); /* Released in Destructor() */
 360     p_input->p->p_item = p_item;
 361
 362     /* Init Input fields */
 363     p_input->p->input.p_access = NULL;
 364     p_input->p->input.p_stream = NULL;
 365     p_input->p->input.p_demux  = NULL;
 366     p_input->p->input.b_title_demux = false;
 367     p_input->p->input.i_title  = 0;
 368     p_input->p->input.title    = NULL;
 369     p_input->p->input.i_title_offset = p_input->p->input.i_seekpoint_offset = 0;
 370     p_input->p->input.b_can_pace_control = true;
 371     p_input->p->input.b_can_rate_control = true;
 372     p_input->p->input.b_rescale_ts = true;
 373     p_input->p->input.b_eof = false;
 374
 375     vlc_mutex_lock( &p_item->lock );
 376
 377     if( !p_item->p_stats )
 378         p_item->p_stats = stats_NewInputStats( p_input );
 379     vlc_mutex_unlock( &p_item->lock );
 380
 381     /* No slave */
 382     p_input->p->i_slave = 0;
 383     p_input->p->slave   = NULL;
 384
 385     /* */
 386     if( p_resource )
 387         p_input->p->p_resource = p_resource;
 388     else
 389         p_input->p->p_resource = input_resource_New();
 390     input_resource_SetInput( p_input->p->p_resource, p_input );
 391
 392     /* Init control buffer */
 393     vlc_mutex_init( &p_input->p->lock_control );
 394     vlc_cond_init( &p_input->p->wait_control );
 395     p_input->p->i_control = 0;
 396     p_input->p->b_abort = false;
 397
 398     /* Parse input options */
 399     vlc_mutex_lock( &p_item->lock );
 400     assert( (int)p_item->optflagc == p_item->i_options );
 401     for( i = 0; i < p_item->i_options; i++ )
 402         var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
 403                          !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
 404     vlc_mutex_unlock( &p_item->lock );
 405
 406     /* Create Object Variables for private use only */
 407     input_ConfigVarInit( p_input );
 408
 409     /* Create Objects variables for public Get and Set */
 410     input_ControlVarInit( p_input );
 411
 412     /* */
 413     if( !p_input->b_preparsing )
 414     {
 415         char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
 416         if( psz_bookmarks )
 417         {
 418             /* FIXME: have a common cfg parsing routine used by sout and others */
 419             char *psz_parser, *psz_start, *psz_end;
 420             psz_parser = psz_bookmarks;
 421             while( (psz_start = strchr( psz_parser, '{' ) ) )
 422             {
 423                  seekpoint_t *p_seekpoint;
 424                  char backup;
 425                  psz_start++;
 426                  psz_end = strchr( psz_start, '}' );
 427                  if( !psz_end ) break;
 428                  psz_parser = psz_end + 1;
 429                  backup = *psz_parser;
 430                  *psz_parser = 0;
 431                  *psz_end = ',';
 432
 433                  p_seekpoint = vlc_seekpoint_New();
 434                  while( (psz_end = strchr( psz_start, ',' ) ) )
 435                  {
 436                      *psz_end = 0;
 437                      if( !strncmp( psz_start, "name=", 5 ) )
 438                      {
 439                          p_seekpoint->psz_name = strdup(psz_start + 5);
 440                      }
 441                      else if( !strncmp( psz_start, "bytes=", 6 ) )
 442                      {
 443                          p_seekpoint->i_byte_offset = atoll(psz_start + 6);
 444                      }
 445                      else if( !strncmp( psz_start, "time=", 5 ) )
 446                      {
 447                          p_seekpoint->i_time_offset = atoll(psz_start + 5) *
 448                                                         1000000;
 449                      }
 450                      psz_start = psz_end + 1;
 451                 }
 452                 msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
 453                                   p_seekpoint->psz_name, p_seekpoint->i_byte_offset,
 454                                   p_seekpoint->i_time_offset );
 455                 input_Control( p_input, INPUT_ADD_BOOKMARK, p_seekpoint );
 456                 vlc_seekpoint_Delete( p_seekpoint );
 457                 *psz_parser = backup;
 458             }
 459             free( psz_bookmarks );
 460         }
 461     }
 462
 463     /* Remove 'Now playing' info as it is probably outdated */
 464     input_item_SetNowPlaying( p_item, NULL );
 465     input_SendEventMeta( p_input );
 466
 467     /* */
 468     if( p_input->b_preparsing )
 469         p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;
 470
 471     /* */
 472     memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
 473     vlc_mutex_init( &p_input->p->counters.counters_lock );
 474
 475     /* Set the destructor when we are sure we are initialized */
 476     vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );
 477
 478     /* Attach only once we are ready */
 479     vlc_object_attach( p_input, p_parent );
 480
 481     return p_input;
 482 }
 483
 484 /**
 485  * Input destructor (called when the object's refcount reaches 0).
 486  */
 487 static void Destructor( input_thread_t * p_input )
 488 {
 489 #ifndef NDEBUG
 490     char * psz_name = input_item_GetName( p_input->p->p_item );
 491     msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
 492     free( psz_name );
 493 #endif
 494
 495     stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
 496     stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
 497
 498     if( p_input->p->p_resource )
 499         input_resource_Delete( p_input->p->p_resource );
 500
 501     vlc_gc_decref( p_input->p->p_item );
 502
 503     vlc_mutex_destroy( &p_input->p->counters.counters_lock );
 504
 505     for( int i = 0; i < p_input->p->i_control; i++ )
 506     {
 507         input_control_t *p_ctrl = &p_input->p->control[i];
 508         ControlRelease( p_ctrl->i_type, p_ctrl->val );
 509     }
 510
 511     vlc_cond_destroy( &p_input->p->wait_control );
 512     vlc_mutex_destroy( &p_input->p->lock_control );
 513     free( p_input->p );
 514 }
 515
 516 /*****************************************************************************
 517  * Run: main thread loop
 518  * This is the "normal" thread that spawns the input processing chain,
 519  * reads the stream, cleans up and waits
 520  *****************************************************************************/
 521 static void *Run( vlc_object_t *p_this )
 522 {
 523     input_thread_t *p_input = (input_thread_t *)p_this;
 524     const int canc = vlc_savecancel();
 525
 526     if( Init( p_input ) )
 527         goto exit;
 528
 529     MainLoop( p_input, true ); /* FIXME it can be wrong (like with VLM) */
 530
 531     /* Clean up */
 532     End( p_input );
 533
 534 exit:
 535     /* Tell we're dead */
 536     vlc_mutex_lock( &p_input->p->lock_control );
 537     const bool b_abort = p_input->p->b_abort;
 538     vlc_mutex_unlock( &p_input->p->lock_control );
 539
 540     if( b_abort )
 541         input_SendEventAbort( p_input );
 542     input_SendEventDead( p_input );
 543
 544     vlc_restorecancel( canc );
 545     return NULL;
 546 }
 547
 548 /*****************************************************************************
 549  * Main loop: Fill buffers from access, and demux
 550  *****************************************************************************/
 551
 552 /**
 553  * MainLoopDemux
 554  * It asks the demuxer to demux some data
 555  */
 556 static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, bool *pb_demux_polled, mtime_t i_start_mdate )
 557 {
 558     int i_ret;
 559
 560     *pb_changed = false;
 561     *pb_demux_polled = p_input->p->input.p_demux->pf_demux != NULL;
 562
 563     if( ( p_input->p->i_stop > 0 && p_input->p->i_time >= p_input->p->i_stop ) ||
 564         ( p_input->p->i_run > 0 && i_start_mdate+p_input->p->i_run < mdate() ) )
 565         i_ret = 0; /* EOF */
 566     else
 567         i_ret = demux_Demux( p_input->p->input.p_demux );
 568
 569     if( i_ret > 0 )
 570     {
 571         if( p_input->p->input.p_demux->info.i_update )
 572         {
 573             if( p_input->p->input.b_title_demux )
 574             {
 575                 i_ret = UpdateTitleSeekpointFromDemux( p_input );
 576                 *pb_changed = true;
 577             }
 578             UpdateGenericFromDemux( p_input );
 579         }
 580         else if( p_input->p->input.p_access &&
 581                  p_input->p->input.p_access->info.i_update )
 582         {
 583             if( !p_input->p->input.b_title_demux )
 584             {
 585                 i_ret = UpdateTitleSeekpointFromAccess( p_input );
 586                 *pb_changed = true;
 587             }
 588             UpdateGenericFromAccess( p_input );
 589         }
 590     }
 591
 592     if( i_ret == 0 )    /* EOF */
 593     {
 594         msg_Dbg( p_input, "EOF reached" );
 595         p_input->p->input.b_eof = true;
 596     }
 597     else if( i_ret < 0 )
 598     {
 599         input_ChangeState( p_input, ERROR_S );
 600     }
 601
 602     if( i_ret > 0 && p_input->p->i_slave > 0 )
 603     {
 604         bool b_demux_polled;
 605         SlaveDemux( p_input, &b_demux_polled );
 606
 607         *pb_demux_polled |= b_demux_polled;
 608     }
 609 }
 610
 611 static int MainLoopTryRepeat( input_thread_t *p_input, mtime_t *pi_start_mdate )
 612 {
 613     int i_repeat = var_GetInteger( p_input, "input-repeat" );
 614     if( i_repeat == 0 )
 615         return VLC_EGENERIC;
 616
 617     vlc_value_t val;
 618
 619     msg_Dbg( p_input, "repeating the same input (%d)", i_repeat );
 620     if( i_repeat > 0 )
 621     {
 622         i_repeat--;
 623         var_SetInteger( p_input, "input-repeat", i_repeat );
 624     }
 625
 626     /* Seek to start title/seekpoint */
 627     val.i_int = p_input->p->input.i_title_start -
 628         p_input->p->input.i_title_offset;
 629     if( val.i_int < 0 || val.i_int >= p_input->p->input.i_title )
 630         val.i_int = 0;
 631     input_ControlPush( p_input,
 632                        INPUT_CONTROL_SET_TITLE, &val );
 633
 634     val.i_int = p_input->p->input.i_seekpoint_start -
 635         p_input->p->input.i_seekpoint_offset;
 636     if( val.i_int > 0 /* TODO: check upper boundary */ )
 637         input_ControlPush( p_input,
 638                            INPUT_CONTROL_SET_SEEKPOINT, &val );
 639
 640     /* Seek to start position */
 641     if( p_input->p->i_start > 0 )
 642     {
 643         val.i_time = p_input->p->i_start;
 644         input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &val );
 645     }
 646     else
 647     {
 648         val.f_float = 0.0;
 649         input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION, &val );
 650     }
 651
 652     /* */
 653     *pi_start_mdate = mdate();
 654     return VLC_SUCCESS;
 655 }
 656
 657 /**
 658  * MainLoopInterface
 659  * It update the variables used by the interfaces
 660  */
 661 static void MainLoopInterface( input_thread_t *p_input )
 662 {
 663     double f_position = 0.0;
 664     mtime_t i_time = 0;
 665     mtime_t i_length = 0;
 666
 667     /* update input status variables */
 668     if( demux_Control( p_input->p->input.p_demux,
 669                        DEMUX_GET_POSITION, &f_position ) )
 670         f_position = 0.0;
 671
 672     if( demux_Control( p_input->p->input.p_demux,
 673                        DEMUX_GET_TIME, &i_time ) )
 674         i_time = 0;
 675     p_input->p->i_time = i_time;
 676
 677     if( demux_Control( p_input->p->input.p_demux,
 678                        DEMUX_GET_LENGTH, &i_length ) )
 679         i_length = 0;
 680
 681     es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
 682
 683     /* update current bookmark */
 684     vlc_mutex_lock( &p_input->p->p_item->lock );
 685     p_input->p->bookmark.i_time_offset = i_time;
 686     if( p_input->p->input.p_stream )
 687         p_input->p->bookmark.i_byte_offset = stream_Tell( p_input->p->input.p_stream );
 688     vlc_mutex_unlock( &p_input->p->p_item->lock );
 689 }
 690
 691 /**
 692  * MainLoopStatistic
 693  * It updates the globals statics
 694  */
 695 static void MainLoopStatistic( input_thread_t *p_input )
 696 {
 697     stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
 698     input_SendEventStatistics( p_input );
 699 }
 700
 701 /**
 702  * MainLoop
 703  * The main input loop.
 704  */
 705 static void MainLoop( input_thread_t *p_input, bool b_interactive )
 706 {
 707     mtime_t i_start_mdate = mdate();
 708     mtime_t i_intf_update = 0;
 709     mtime_t i_statistic_update = 0;
 710     bool b_pause_after_eof = b_interactive &&
 711                              var_CreateGetBool( p_input, "play-and-pause" );
 712
 713     /* Start the timer */
 714     stats_TimerStop( p_input, STATS_TIMER_INPUT_LAUNCHING );
 715
 716     while( vlc_object_alive( p_input ) && !p_input->b_error )
 717     {
 718         bool b_force_update;
 719         int i_type;
 720         vlc_value_t val;
 721         mtime_t i_current;
 722         mtime_t i_deadline;
 723         mtime_t i_wakeup;
 724         bool b_paused;
 725         bool b_demux_polled;
 726
 727         /* Demux data */
 728         b_force_update = false;
 729         i_wakeup = 0;
 730         /* FIXME if p_input->p->i_state == PAUSE_S the access/access_demux
 731          * is paused -> this may cause problem with some of them
 732          * The same problem can be seen when seeking while paused */
 733         b_paused = p_input->p->i_state == PAUSE_S &&
 734                    ( !es_out_GetBuffering( p_input->p->p_es_out ) || p_input->p->input.b_eof );
 735
 736         b_demux_polled = true;
 737         if( !b_paused )
 738         {
 739             if( !p_input->p->input.b_eof )
 740             {
 741                 MainLoopDemux( p_input, &b_force_update, &b_demux_polled, i_start_mdate );
 742
 743                 i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
 744             }
 745             else if( !es_out_GetEmpty( p_input->p->p_es_out ) )
 746             {
 747                 msg_Dbg( p_input, "waiting decoder fifos to empty" );
 748                 i_wakeup = mdate() + INPUT_IDLE_SLEEP;
 749             }
 750             else if( b_pause_after_eof )
 751             {
 752                 msg_Dbg( p_input, "pausing at EOF (pause after each)");
 753                 val.i_int = PAUSE_S;
 754                 Control( p_input, INPUT_CONTROL_SET_STATE, val );
 755
 756                 b_pause_after_eof = false;
 757                 b_paused = true;
 758             }
 759             else
 760             {
 761                 if( MainLoopTryRepeat( p_input, &i_start_mdate ) )
 762                     break;
 763                 b_pause_after_eof = var_GetBool( p_input, "play-and-pause" );
 764             }
 765         }
 766
 767         /* */
 768         do {
 769             i_deadline = i_wakeup;
 770             if( b_paused || !b_demux_polled )
 771                 i_deadline = __MIN( i_intf_update, i_statistic_update );
 772
 773             /* Handle control */
 774             ControlReduce( p_input );
 775             while( !ControlPop( p_input, &i_type, &val, i_deadline ) )
 776             {
 777
 778                 msg_Dbg( p_input, "control type=%d", i_type );
 779
 780                 if( Control( p_input, i_type, val ) )
 781                     b_force_update = true;
 782             }
 783
 784             /* Update interface and statistics */
 785             i_current = mdate();
 786             if( i_intf_update < i_current || b_force_update )
 787             {
 788                 MainLoopInterface( p_input );
 789                 i_intf_update = i_current + INT64_C(250000);
 790                 b_force_update = false;
 791             }
 792             if( i_statistic_update < i_current )
 793             {
 794                 MainLoopStatistic( p_input );
 795                 i_statistic_update = i_current + INT64_C(1000000);
 796             }
 797
 798             /* Update the wakeup time */
 799             if( i_wakeup != 0 )
 800                 i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
 801         } while( i_current < i_wakeup );
 802     }
 803
 804     if( !p_input->b_error )
 805         input_ChangeState( p_input, END_S );
 806 }
 807
 808 static void InitStatistics( input_thread_t * p_input )
 809 {
 810     if( p_input->b_preparsing ) return;
 811
 812     /* Prepare statistics */
 813 #define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 814  stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
 815     if( libvlc_stats( p_input ) )
 816     {
 817         INIT_COUNTER( read_bytes, INTEGER, COUNTER );
 818         INIT_COUNTER( read_packets, INTEGER, COUNTER );
 819         INIT_COUNTER( demux_read, INTEGER, COUNTER );
 820         INIT_COUNTER( input_bitrate, FLOAT, DERIVATIVE );
 821         INIT_COUNTER( demux_bitrate, FLOAT, DERIVATIVE );
 822         INIT_COUNTER( demux_corrupted, INTEGER, COUNTER );
 823         INIT_COUNTER( demux_discontinuity, INTEGER, COUNTER );
 824         INIT_COUNTER( played_abuffers, INTEGER, COUNTER );
 825         INIT_COUNTER( lost_abuffers, INTEGER, COUNTER );
 826         INIT_COUNTER( displayed_pictures, INTEGER, COUNTER );
 827         INIT_COUNTER( lost_pictures, INTEGER, COUNTER );
 828         INIT_COUNTER( decoded_audio, INTEGER, COUNTER );
 829         INIT_COUNTER( decoded_video, INTEGER, COUNTER );
 830         INIT_COUNTER( decoded_sub, INTEGER, COUNTER );
 831         p_input->p->counters.p_sout_send_bitrate = NULL;
 832         p_input->p->counters.p_sout_sent_packets = NULL;
 833         p_input->p->counters.p_sout_sent_bytes = NULL;
 834         if( p_input->p->counters.p_demux_bitrate )
 835             p_input->p->counters.p_demux_bitrate->update_interval = 1000000;
 836         if( p_input->p->counters.p_input_bitrate )
 837             p_input->p->counters.p_input_bitrate->update_interval = 1000000;
 838     }
 839 }
 840
 841 #ifdef ENABLE_SOUT
 842 static int InitSout( input_thread_t * p_input )
 843 {
 844     if( p_input->b_preparsing )
 845         return VLC_SUCCESS;
 846
 847     /* Find a usable sout and attach it to p_input */
 848     char *psz = var_GetNonEmptyString( p_input, "sout" );
 849     if( psz && strncasecmp( p_input->p->p_item->psz_uri, "vlc:", 4 ) )
 850     {
 851         p_input->p->p_sout  = input_resource_RequestSout( p_input->p->p_resource, NULL, psz );
 852         if( !p_input->p->p_sout )
 853         {
 854             input_ChangeState( p_input, ERROR_S );
 855             msg_Err( p_input, "cannot start stream output instance, " \
 856                               "aborting" );
 857             free( psz );
 858             return VLC_EGENERIC;
 859         }
 860         if( libvlc_stats( p_input ) )
 861         {
 862             INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
 863             INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
 864             INIT_COUNTER( sout_send_bitrate, FLOAT, DERIVATIVE );
 865             if( p_input->p->counters.p_sout_send_bitrate )
 866                  p_input->p->counters.p_sout_send_bitrate->update_interval =
 867                          1000000;
 868         }
 869     }
 870     else
 871     {
 872         input_resource_RequestSout( p_input->p->p_resource, NULL, NULL );
 873     }
 874     free( psz );
 875
 876     return VLC_SUCCESS;
 877 }
 878 #endif
 879
 880 static void InitTitle( input_thread_t * p_input )
 881 {
 882     input_source_t *p_master = &p_input->p->input;
 883
 884     if( p_input->b_preparsing )
 885         return;
 886
 887     /* Create global title (from master) */
 888     p_input->p->i_title = p_master->i_title;
 889     p_input->p->title   = p_master->title;
 890     p_input->p->i_title_offset = p_master->i_title_offset;
 891     p_input->p->i_seekpoint_offset = p_master->i_seekpoint_offset;
 892     if( p_input->p->i_title > 0 )
 893     {
 894         /* Setup variables */
 895         input_ControlVarNavigation( p_input );
 896         input_SendEventTitle( p_input, 0 );
 897     }
 898
 899     /* Global flag */
 900     p_input->p->b_can_pace_control    = p_master->b_can_pace_control;
 901     p_input->p->b_can_pause        = p_master->b_can_pause;
 902     p_input->p->b_can_rate_control = p_master->b_can_rate_control;
 903 }
 904
 905 static void StartTitle( input_thread_t * p_input )
 906 {
 907     vlc_value_t val;
 908
 909     /* Start title/chapter */
 910     val.i_int = p_input->p->input.i_title_start -
 911                 p_input->p->input.i_title_offset;
 912     if( val.i_int > 0 && val.i_int < p_input->p->input.i_title )
 913         input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
 914
 915     val.i_int = p_input->p->input.i_seekpoint_start -
 916                 p_input->p->input.i_seekpoint_offset;
 917     if( val.i_int > 0 /* TODO: check upper boundary */ )
 918         input_ControlPush( p_input, INPUT_CONTROL_SET_SEEKPOINT, &val );
 919
 920     /* Start/stop/run time */
 921     p_input->p->i_start = (int64_t)(1000000.0
 922                                      * var_GetFloat( p_input, "start-time" ));
 923     p_input->p->i_stop  = (int64_t)(1000000.0
 924                                      * var_GetFloat( p_input, "stop-time" ));
 925     p_input->p->i_run   = (int64_t)(1000000.0
 926                                      * var_GetFloat( p_input, "run-time" ));
 927     if( p_input->p->i_run < 0 )
 928     {
 929         msg_Warn( p_input, "invalid run-time ignored" );
 930         p_input->p->i_run = 0;
 931     }
 932
 933     if( p_input->p->i_start > 0 )
 934     {
 935         vlc_value_t s;
 936
 937         msg_Dbg( p_input, "starting at time: %ds",
 938                  (int)( p_input->p->i_start / INT64_C(1000000) ) );
 939
 940         s.i_time = p_input->p->i_start;
 941         input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
 942     }
 943     if( p_input->p->i_stop > 0 && p_input->p->i_stop <= p_input->p->i_start )
 944     {
 945         msg_Warn( p_input, "invalid stop-time ignored" );
 946         p_input->p->i_stop = 0;
 947     }
 948     p_input->p->b_fast_seek = var_GetBool( p_input, "input-fast-seek" );
 949 }
 950
 951 static void LoadSubtitles( input_thread_t *p_input )
 952 {
 953     /* Load subtitles */
 954     /* Get fps and set it if not already set */
 955     const double f_fps = p_input->p->f_fps;
 956     if( f_fps > 1.0 )
 957     {
 958         float f_requested_fps;
 959
 960         var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
 961         var_SetFloat( p_input, "sub-original-fps", f_fps );
 962
 963         f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
 964         if( f_requested_fps != f_fps )
 965         {
 966             var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
 967                                             VLC_VAR_DOINHERIT );
 968             var_SetFloat( p_input, "sub-fps", f_requested_fps );
 969         }
 970     }
 971
 972     const int i_delay = var_CreateGetInteger( p_input, "sub-delay" );
 973     if( i_delay != 0 )
 974         var_SetTime( p_input, "spu-delay", (mtime_t)i_delay * 100000 );
 975
 976     /* Look for and add subtitle files */
 977     char *psz_subtitle = var_GetNonEmptyString( p_input, "sub-file" );
 978     if( psz_subtitle != NULL )
 979     {
 980         msg_Dbg( p_input, "forced subtitle: %s", psz_subtitle );
 981         SubtitleAdd( p_input, psz_subtitle, true );
 982     }
 983
 984     if( var_GetBool( p_input, "sub-autodetect-file" ) )
 985     {
 986         char *psz_autopath = var_GetNonEmptyString( p_input, "sub-autodetect-path" );
 987         char **ppsz_subs = subtitles_Detect( p_input, psz_autopath,
 988                                              p_input->p->p_item->psz_uri );
 989         free( psz_autopath );
 990
 991         for( int i = 0; ppsz_subs && ppsz_subs[i]; i++ )
 992         {
 993             /* Try to autoselect the first autodetected subtitles file
 994              * if no subtitles file was specified */
 995             bool b_forced = i == 0 && !psz_subtitle;
 996
 997             if( !psz_subtitle || strcmp( psz_subtitle, ppsz_subs[i] ) )
 998                 SubtitleAdd( p_input, ppsz_subs[i], b_forced );
 999
1000             free( ppsz_subs[i] );
1001         }
1002         free( ppsz_subs );
1003     }
1004     free( psz_subtitle );
1005 }
1006
1007 static void LoadSlaves( input_thread_t *p_input )
1008 {
1009     char *psz = var_GetNonEmptyString( p_input, "input-slave" );
1010     if( !psz )
1011         return;
1012
1013     char *psz_org = psz;
1014     while( psz && *psz )
1015     {
1016         while( *psz == ' ' || *psz == '#' )
1017             psz++;
1018
1019         char *psz_delim = strchr( psz, '#' );
1020         if( psz_delim )
1021             *psz_delim++ = '\0';
1022
1023         if( *psz == 0 )
1024             break;
1025
1026         msg_Dbg( p_input, "adding slave input '%s'", psz );
1027
1028         input_source_t *p_slave = InputSourceNew( p_input );
1029         if( p_slave && !InputSourceInit( p_input, p_slave, psz, NULL ) )
1030             TAB_APPEND( p_input->p->i_slave, p_input->p->slave, p_slave );
1031         else
1032             free( p_slave );
1033
1034         psz = psz_delim;
1035     }
1036     free( psz_org );
1037 }
1038
1039 static void UpdatePtsDelay( input_thread_t *p_input )
1040 {
1041     input_thread_private_t *p_sys = p_input->p;
1042
1043     /* Get max pts delay from input source */
1044     mtime_t i_pts_delay = p_sys->input.i_pts_delay;
1045     for( int i = 0; i < p_sys->i_slave; i++ )
1046         i_pts_delay = __MAX( i_pts_delay, p_sys->slave[i]->i_pts_delay );
1047
1048     if( i_pts_delay < 0 )
1049         i_pts_delay = 0;
1050
1051     /* Take care of audio/spu delay */
1052     const mtime_t i_audio_delay = var_GetTime( p_input, "audio-delay" );
1053     const mtime_t i_spu_delay   = var_GetTime( p_input, "spu-delay" );
1054     const mtime_t i_extra_delay = __MIN( i_audio_delay, i_spu_delay );
1055     if( i_extra_delay < 0 )
1056         i_pts_delay -= i_extra_delay;
1057
1058     /* Update cr_average depending on the caching */
1059     const int i_cr_average = var_GetInteger( p_input, "cr-average" ) * i_pts_delay / DEFAULT_PTS_DELAY;
1060
1061     /* */
1062     es_out_SetJitter( p_input->p->p_es_out, i_pts_delay, i_cr_average );
1063 }
1064
1065 static void InitPrograms( input_thread_t * p_input )
1066 {
1067     int i_es_out_mode;
1068     vlc_value_t val;
1069
1070     /* Compute correct pts_delay */
1071     UpdatePtsDelay( p_input );
1072
1073     /* Set up es_out */
1074     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, true );
1075     i_es_out_mode = ES_OUT_MODE_AUTO;
1076     if( p_input->p->p_sout )
1077     {
1078         if( var_GetBool( p_input, "sout-all" ) )
1079         {
1080             i_es_out_mode = ES_OUT_MODE_ALL;
1081         }
1082         else
1083         {
1084             var_Get( p_input, "programs", &val );
1085             if( val.p_list && val.p_list->i_count )
1086             {
1087                 i_es_out_mode = ES_OUT_MODE_PARTIAL;
1088                 /* Note : we should remove the "program" callback. */
1089             }
1090             else
1091             {
1092                 var_FreeList( &val, NULL );
1093             }
1094         }
1095     }
1096     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, i_es_out_mode );
1097
1098     /* Inform the demuxer about waited group (needed only for DVB) */
1099     if( i_es_out_mode == ES_OUT_MODE_ALL )
1100     {
1101         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, -1, NULL );
1102     }
1103     else if( i_es_out_mode == ES_OUT_MODE_PARTIAL )
1104     {
1105         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, -1,
1106                         val.p_list );
1107     }
1108     else
1109     {
1110         demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP,
1111                        (int) var_GetInteger( p_input, "program" ), NULL );
1112     }
1113 }
1114
1115 static int Init( input_thread_t * p_input )
1116 {
1117     vlc_meta_t *p_meta;
1118     int i, ret;
1119
1120     for( i = 0; i < p_input->p->p_item->i_options; i++ )
1121     {
1122         if( !strncmp( p_input->p->p_item->ppsz_options[i], "meta-file", 9 ) )
1123         {
1124             msg_Dbg( p_input, "Input is a meta file: disabling unneeded options" );
1125             var_SetString( p_input, "sout", "" );
1126             var_SetBool( p_input, "sout-all", false );
1127             var_SetString( p_input, "input-slave", "" );
1128             var_SetInteger( p_input, "input-repeat", 0 );
1129             var_SetString( p_input, "sub-file", "" );
1130             var_SetBool( p_input, "sub-autodetect-file", false );
1131         }
1132     }
1133
1134     InitStatistics( p_input );
1135 #ifdef ENABLE_SOUT
1136     ret = InitSout( p_input );
1137     if( ret != VLC_SUCCESS )
1138         goto error_stats;
1139 #endif
1140
1141     /* Create es out */
1142     p_input->p->p_es_out_display = input_EsOutNew( p_input, p_input->p->i_rate );
1143     p_input->p->p_es_out         = input_EsOutTimeshiftNew( p_input, p_input->p->p_es_out_display, p_input->p->i_rate );
1144     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, false );
1145     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
1146
1147     /* */
1148     input_ChangeState( p_input, OPENING_S );
1149     input_SendEventCache( p_input, 0.0 );
1150
1151     /* */
1152     if( InputSourceInit( p_input, &p_input->p->input,
1153                          p_input->p->p_item->psz_uri, NULL ) )
1154     {
1155         goto error;
1156     }
1157
1158     InitTitle( p_input );
1159
1160     /* Load master infos */
1161     /* Init length */
1162     mtime_t i_length;
1163     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_LENGTH,
1164                          &i_length ) )
1165         i_length = 0;
1166     if( i_length <= 0 )
1167         i_length = input_item_GetDuration( p_input->p->p_item );
1168     input_SendEventLength( p_input, i_length );
1169
1170     input_SendEventPosition( p_input, 0.0, 0 );
1171
1172     if( !p_input->b_preparsing )
1173     {
1174         StartTitle( p_input );
1175         LoadSubtitles( p_input );
1176         LoadSlaves( p_input );
1177         InitPrograms( p_input );
1178     }
1179
1180     if( !p_input->b_preparsing && p_input->p->p_sout )
1181     {
1182         p_input->p->b_out_pace_control = (p_input->p->p_sout->i_out_pace_nocontrol > 0);
1183
1184         if( p_input->p->b_can_pace_control && p_input->p->b_out_pace_control )
1185         {
1186             /* We don't want a high input priority here or we'll
1187              * end-up sucking up all the CPU time */
1188             vlc_thread_set_priority( p_input, VLC_THREAD_PRIORITY_LOW );
1189         }
1190
1191         msg_Dbg( p_input, "starting in %s mode",
1192                  p_input->p->b_out_pace_control ? "async" : "sync" );
1193     }
1194
1195     p_meta = vlc_meta_New();
1196     if( p_meta )
1197     {
1198         /* Get meta data from users */
1199         InputMetaUser( p_input, p_meta );
1200
1201         /* Get meta data from master input */
1202         InputSourceMeta( p_input, &p_input->p->input, p_meta );
1203
1204         /* And from slave */
1205         for( int i = 0; i < p_input->p->i_slave; i++ )
1206             InputSourceMeta( p_input, p_input->p->slave[i], p_meta );
1207
1208         /* */
1209         InputUpdateMeta( p_input, p_meta );
1210     }
1211
1212     msg_Dbg( p_input, "`%s' successfully opened",
1213              p_input->p->p_item->psz_uri );
1214
1215     /* initialization is complete */
1216     input_ChangeState( p_input, PLAYING_S );
1217
1218     return VLC_SUCCESS;
1219
1220 error:
1221     input_ChangeState( p_input, ERROR_S );
1222
1223     if( p_input->p->p_es_out )
1224         es_out_Delete( p_input->p->p_es_out );
1225     if( p_input->p->p_es_out_display )
1226         es_out_Delete( p_input->p->p_es_out_display );
1227     if( p_input->p->p_resource )
1228     {
1229         if( p_input->p->p_sout )
1230             input_resource_RequestSout( p_input->p->p_resource,
1231                                          p_input->p->p_sout, NULL );
1232         input_resource_SetInput( p_input->p->p_resource, NULL );
1233     }
1234
1235 #ifdef ENABLE_SOUT
1236 error_stats:
1237 #endif
1238     if( !p_input->b_preparsing && libvlc_stats( p_input ) )
1239     {
1240 #define EXIT_COUNTER( c ) do { if( p_input->p->counters.p_##c ) \
1241                                    stats_CounterClean( p_input->p->counters.p_##c );\
1242                                p_input->p->counters.p_##c = NULL; } while(0)
1243         EXIT_COUNTER( read_bytes );
1244         EXIT_COUNTER( read_packets );
1245         EXIT_COUNTER( demux_read );
1246         EXIT_COUNTER( input_bitrate );
1247         EXIT_COUNTER( demux_bitrate );
1248         EXIT_COUNTER( demux_corrupted );
1249         EXIT_COUNTER( demux_discontinuity );
1250         EXIT_COUNTER( played_abuffers );
1251         EXIT_COUNTER( lost_abuffers );
1252         EXIT_COUNTER( displayed_pictures );
1253         EXIT_COUNTER( lost_pictures );
1254         EXIT_COUNTER( decoded_audio );
1255         EXIT_COUNTER( decoded_video );
1256         EXIT_COUNTER( decoded_sub );
1257
1258         if( p_input->p->p_sout )
1259         {
1260             EXIT_COUNTER( sout_sent_packets );
1261             EXIT_COUNTER( sout_sent_bytes );
1262             EXIT_COUNTER( sout_send_bitrate );
1263         }
1264 #undef EXIT_COUNTER
1265     }
1266
1267     /* Mark them deleted */
1268     p_input->p->input.p_demux = NULL;
1269     p_input->p->input.p_stream = NULL;
1270     p_input->p->input.p_access = NULL;
1271     p_input->p->p_es_out = NULL;
1272     p_input->p->p_es_out_display = NULL;
1273     p_input->p->p_sout = NULL;
1274
1275     return VLC_EGENERIC;
1276 }
1277
1278 /*****************************************************************************
1279  * End: end the input thread
1280  *****************************************************************************/
1281 static void End( input_thread_t * p_input )
1282 {
1283     int i;
1284
1285     /* We are at the end */
1286     input_ChangeState( p_input, END_S );
1287
1288     /* Clean control variables */
1289     input_ControlVarStop( p_input );
1290
1291     /* Stop es out activity */
1292     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, false );
1293     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
1294
1295     /* Clean up master */
1296     InputSourceClean( &p_input->p->input );
1297
1298     /* Delete slave */
1299     for( i = 0; i < p_input->p->i_slave; i++ )
1300     {
1301         InputSourceClean( p_input->p->slave[i] );
1302         free( p_input->p->slave[i] );
1303     }
1304     free( p_input->p->slave );
1305
1306     /* Unload all modules */
1307     if( p_input->p->p_es_out )
1308         es_out_Delete( p_input->p->p_es_out );
1309     if( p_input->p->p_es_out_display )
1310         es_out_Delete( p_input->p->p_es_out_display );
1311
1312     if( !p_input->b_preparsing )
1313     {
1314 #define CL_CO( c ) stats_CounterClean( p_input->p->counters.p_##c ); p_input->p->counters.p_##c = NULL;
1315         if( libvlc_stats( p_input ) )
1316         {
1317             /* make sure we are up to date */
1318             stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
1319             CL_CO( read_bytes );
1320             CL_CO( read_packets );
1321             CL_CO( demux_read );
1322             CL_CO( input_bitrate );
1323             CL_CO( demux_bitrate );
1324             CL_CO( demux_corrupted );
1325             CL_CO( demux_discontinuity );
1326             CL_CO( played_abuffers );
1327             CL_CO( lost_abuffers );
1328             CL_CO( displayed_pictures );
1329             CL_CO( lost_pictures );
1330             CL_CO( decoded_audio) ;
1331             CL_CO( decoded_video );
1332             CL_CO( decoded_sub) ;
1333         }
1334
1335         /* Close optional stream output instance */
1336         if( p_input->p->p_sout )
1337         {
1338             CL_CO( sout_sent_packets );
1339             CL_CO( sout_sent_bytes );
1340             CL_CO( sout_send_bitrate );
1341         }
1342 #undef CL_CO
1343     }
1344
1345     vlc_mutex_lock( &p_input->p->p_item->lock );
1346     if( p_input->p->i_attachment > 0 )
1347     {
1348         for( i = 0; i < p_input->p->i_attachment; i++ )
1349             vlc_input_attachment_Delete( p_input->p->attachment[i] );
1350         TAB_CLEAN( p_input->p->i_attachment, p_input->p->attachment );
1351     }
1352     vlc_mutex_unlock( &p_input->p->p_item->lock );
1353
1354     /* */
1355     input_resource_RequestSout( p_input->p->p_resource,
1356                                  p_input->p->p_sout, NULL );
1357     input_resource_SetInput( p_input->p->p_resource, NULL );
1358 }
1359
1360 /*****************************************************************************
1361  * Control
1362  *****************************************************************************/
1363 void input_ControlPush( input_thread_t *p_input,
1364                         int i_type, vlc_value_t *p_val )
1365 {
1366     vlc_mutex_lock( &p_input->p->lock_control );
1367     if( i_type == INPUT_CONTROL_SET_DIE )
1368     {
1369         /* Special case, empty the control */
1370         for( int i = 0; i < p_input->p->i_control; i++ )
1371         {
1372             input_control_t *p_ctrl = &p_input->p->control[i];
1373             ControlRelease( p_ctrl->i_type, p_ctrl->val );
1374         }
1375         p_input->p->i_control = 0;
1376     }
1377
1378     if( p_input->p->i_control >= INPUT_CONTROL_FIFO_SIZE )
1379     {
1380         msg_Err( p_input, "input control fifo overflow, trashing type=%d",
1381                  i_type );
1382         if( p_val )
1383             ControlRelease( i_type, *p_val );
1384     }
1385     else
1386     {
1387         input_control_t c;
1388         c.i_type = i_type;
1389         if( p_val )
1390             c.val = *p_val;
1391         else
1392             memset( &c.val, 0, sizeof(c.val) );
1393
1394         p_input->p->control[p_input->p->i_control++] = c;
1395     }
1396     vlc_cond_signal( &p_input->p->wait_control );
1397     vlc_mutex_unlock( &p_input->p->lock_control );
1398 }
1399
1400 static inline int ControlPop( input_thread_t *p_input,
1401                               int *pi_type, vlc_value_t *p_val,
1402                               mtime_t i_deadline )
1403 {
1404     input_thread_private_t *p_sys = p_input->p;
1405
1406     vlc_mutex_lock( &p_sys->lock_control );
1407     while( p_sys->i_control <= 0 )
1408     {
1409         if( !vlc_object_alive( p_input ) || i_deadline < 0 )
1410         {
1411             vlc_mutex_unlock( &p_sys->lock_control );
1412             return VLC_EGENERIC;
1413         }
1414
1415         if( vlc_cond_timedwait( &p_sys->wait_control, &p_sys->lock_control,
1416                                 i_deadline ) )
1417         {
1418             vlc_mutex_unlock( &p_sys->lock_control );
1419             return VLC_EGENERIC;
1420         }
1421     }
1422
1423     /* */
1424     *pi_type = p_sys->control[0].i_type;
1425     *p_val   = p_sys->control[0].val;
1426
1427     p_sys->i_control--;
1428     if( p_sys->i_control > 0 )
1429         memmove( &p_sys->control[0], &p_sys->control[1],
1430                  sizeof(*p_sys->control) * p_sys->i_control );
1431     vlc_mutex_unlock( &p_sys->lock_control );
1432
1433     return VLC_SUCCESS;
1434 }
1435
1436 static void ControlReduce( input_thread_t *p_input )
1437 {
1438     vlc_mutex_lock( &p_input->p->lock_control );
1439
1440     for( int i = 1; i < p_input->p->i_control; i++ )
1441     {
1442         const int i_lt = p_input->p->control[i-1].i_type;
1443         const int i_ct = p_input->p->control[i].i_type;
1444
1445         /* XXX We can't merge INPUT_CONTROL_SET_ES */
1446 /*        msg_Dbg( p_input, "[%d/%d] l=%d c=%d", i, p_input->p->i_control,
1447                  i_lt, i_ct );
1448 */
1449         if( i_lt == i_ct &&
1450             ( i_ct == INPUT_CONTROL_SET_STATE ||
1451               i_ct == INPUT_CONTROL_SET_RATE ||
1452               i_ct == INPUT_CONTROL_SET_POSITION ||
1453               i_ct == INPUT_CONTROL_SET_TIME ||
1454               i_ct == INPUT_CONTROL_SET_PROGRAM ||
1455               i_ct == INPUT_CONTROL_SET_TITLE ||
1456               i_ct == INPUT_CONTROL_SET_SEEKPOINT ||
1457               i_ct == INPUT_CONTROL_SET_BOOKMARK ) )
1458         {
1459             int j;
1460 //            msg_Dbg( p_input, "merged at %d", i );
1461             /* Remove the i-1 */
1462             for( j = i; j <  p_input->p->i_control; j++ )
1463                 p_input->p->control[j-1] = p_input->p->control[j];
1464             p_input->p->i_control--;
1465         }
1466         else
1467         {
1468             /* TODO but that's not that important
1469                 - merge SET_X with SET_X_CMD
1470                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before a SET_TITLE
1471                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before another among them
1472                 - ?
1473                 */
1474         }
1475     }
1476     vlc_mutex_unlock( &p_input->p->lock_control );
1477 }
1478
1479 static void ControlRelease( int i_type, vlc_value_t val )
1480 {
1481     switch( i_type )
1482     {
1483     case INPUT_CONTROL_ADD_SUBTITLE:
1484     case INPUT_CONTROL_ADD_SLAVE:
1485         free( val.psz_string );
1486         break;
1487
1488     default:
1489         break;
1490     }
1491 }
1492
1493 /* Pause input */
1494 static void ControlPause( input_thread_t *p_input, mtime_t i_control_date )
1495 {
1496     int i_ret = VLC_SUCCESS;
1497     int i_state = PAUSE_S;
1498
1499     if( p_input->p->b_can_pause )
1500     {
1501         if( p_input->p->input.p_access )
1502             i_ret = access_Control( p_input->p->input.p_access,
1503                                      ACCESS_SET_PAUSE_STATE, true );
1504         else
1505             i_ret = demux_Control( p_input->p->input.p_demux,
1506                                     DEMUX_SET_PAUSE_STATE, true );
1507
1508         if( i_ret )
1509         {
1510             msg_Warn( p_input, "cannot set pause state" );
1511             return;
1512         }
1513     }
1514
1515     /* */
1516     i_ret = es_out_SetPauseState( p_input->p->p_es_out,
1517                                   p_input->p->b_can_pause, true,
1518                                   i_control_date );
1519     if( i_ret )
1520     {
1521         msg_Warn( p_input, "cannot set pause state at es_out level" );
1522         return;
1523     }
1524
1525     /* Switch to new state */
1526     input_ChangeState( p_input, i_state );
1527 }
1528
1529 static void ControlUnpause( input_thread_t *p_input, mtime_t i_control_date )
1530 {
1531     int i_ret = VLC_SUCCESS;
1532
1533     if( p_input->p->b_can_pause )
1534     {
1535         if( p_input->p->input.p_access )
1536             i_ret = access_Control( p_input->p->input.p_access,
1537                                      ACCESS_SET_PAUSE_STATE, false );
1538         else
1539             i_ret = demux_Control( p_input->p->input.p_demux,
1540                                     DEMUX_SET_PAUSE_STATE, false );
1541         if( i_ret )
1542         {
1543             /* FIXME What to do ? */
1544             msg_Warn( p_input, "cannot unset pause -> EOF" );
1545             input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
1546         }
1547     }
1548
1549     /* Switch to play */
1550     input_ChangeState( p_input, PLAYING_S );
1551
1552     /* */
1553     if( !i_ret )
1554         es_out_SetPauseState( p_input->p->p_es_out, false, false, i_control_date );
1555 }
1556
1557 static bool Control( input_thread_t *p_input,
1558                      int i_type, vlc_value_t val )
1559 {
1560     const mtime_t i_control_date = mdate();
1561     /* FIXME b_force_update is abused, it should be carefully checked */
1562     bool b_force_update = false;
1563
1564     if( !p_input )
1565         return b_force_update;
1566
1567     switch( i_type )
1568     {
1569         case INPUT_CONTROL_SET_DIE:
1570             msg_Dbg( p_input, "control: stopping input" );
1571
1572             /* Mark all submodules to die */
1573             ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
1574             break;
1575
1576         case INPUT_CONTROL_SET_POSITION:
1577         case INPUT_CONTROL_SET_POSITION_OFFSET:
1578         {
1579             double f_pos;
1580
1581             if( p_input->p->b_recording )
1582             {
1583                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) ignored while recording" );
1584                 break;
1585             }
1586             f_pos = val.f_float;
1587             if( i_type != INPUT_CONTROL_SET_POSITION )
1588                 f_pos += var_GetFloat( p_input, "position" );
1589             if( f_pos < 0.0 )
1590                 f_pos = 0.0;
1591             else if( f_pos > 1.0 )
1592                 f_pos = 1.0;
1593             /* Reset the decoders states and clock sync (before calling the demuxer */
1594             es_out_SetTime( p_input->p->p_es_out, -1 );
1595             if( demux_Control( p_input->p->input.p_demux, DEMUX_SET_POSITION,
1596                                 f_pos, !p_input->p->b_fast_seek ) )
1597             {
1598                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) "
1599                          "%2.1f%% failed", f_pos * 100 );
1600             }
1601             else
1602             {
1603                 if( p_input->p->i_slave > 0 )
1604                     SlaveSeek( p_input );
1605                 p_input->p->input.b_eof = false;
1606
1607                 b_force_update = true;
1608             }
1609             break;
1610         }
1611
1612         case INPUT_CONTROL_SET_TIME:
1613         case INPUT_CONTROL_SET_TIME_OFFSET:
1614         {
1615             int64_t i_time;
1616             int i_ret;
1617
1618             if( p_input->p->b_recording )
1619             {
1620                 msg_Err( p_input, "INPUT_CONTROL_SET_TIME(_OFFSET) ignored while recording" );
1621                 break;
1622             }
1623
1624             i_time = val.i_time;
1625             if( i_type != INPUT_CONTROL_SET_TIME )
1626                 i_time += var_GetTime( p_input, "time" );
1627
1628             if( i_time < 0 )
1629                 i_time = 0;
1630
1631             /* Reset the decoders states and clock sync (before calling the demuxer */
1632             es_out_SetTime( p_input->p->p_es_out, -1 );
1633
1634             i_ret = demux_Control( p_input->p->input.p_demux,
1635                                    DEMUX_SET_TIME, i_time,
1636                                    !p_input->p->b_fast_seek );
1637             if( i_ret )
1638             {
1639                 int64_t i_length;
1640
1641                 /* Emulate it with a SET_POS */
1642                 if( !demux_Control( p_input->p->input.p_demux,
1643                                     DEMUX_GET_LENGTH, &i_length ) && i_length > 0 )
1644                 {
1645                     double f_pos = (double)i_time / (double)i_length;
1646                     i_ret = demux_Control( p_input->p->input.p_demux,
1647                                             DEMUX_SET_POSITION, f_pos,
1648                                             !p_input->p->b_fast_seek );
1649                 }
1650             }
1651             if( i_ret )
1652             {
1653                 msg_Warn( p_input, "INPUT_CONTROL_SET_TIME(_OFFSET) %"PRId64
1654                          " failed or not possible", i_time );
1655             }
1656             else
1657             {
1658                 if( p_input->p->i_slave > 0 )
1659                     SlaveSeek( p_input );
1660                 p_input->p->input.b_eof = false;
1661
1662                 b_force_update = true;
1663             }
1664             break;
1665         }
1666
1667         case INPUT_CONTROL_SET_STATE:
1668             if( val.i_int != PLAYING_S && val.i_int != PAUSE_S )
1669                 msg_Err( p_input, "invalid state in INPUT_CONTROL_SET_STATE" );
1670             else if( p_input->p->i_state == PAUSE_S )
1671             {
1672                 ControlUnpause( p_input, i_control_date );
1673
1674                 b_force_update = true;
1675             }
1676             else if( val.i_int == PAUSE_S && p_input->p->i_state == PLAYING_S /* &&
1677                      p_input->p->b_can_pause */ )
1678             {
1679                 ControlPause( p_input, i_control_date );
1680
1681                 b_force_update = true;
1682             }
1683             else if( val.i_int == PAUSE_S && !p_input->p->b_can_pause && 0 )
1684             {
1685                 b_force_update = true;
1686
1687                 /* Correct "state" value */
1688                 input_ChangeState( p_input, p_input->p->i_state );
1689             }
1690             break;
1691
1692         case INPUT_CONTROL_SET_RATE:
1693         case INPUT_CONTROL_SET_RATE_SLOWER:
1694         case INPUT_CONTROL_SET_RATE_FASTER:
1695         {
1696             int i_rate;
1697             int i_rate_sign;
1698
1699             /* Get rate and direction */
1700             if( i_type == INPUT_CONTROL_SET_RATE )
1701             {
1702                 i_rate = abs( val.i_int );
1703                 i_rate_sign = val.i_int < 0 ? -1 : 1;
1704             }
1705             else
1706             {
1707                 static const int ppi_factor[][2] = {
1708                     {1,64}, {1,32}, {1,16}, {1,8}, {1,4}, {1,3}, {1,2}, {2,3},
1709                     {1,1},
1710                     {3,2}, {2,1}, {3,1}, {4,1}, {8,1}, {16,1}, {32,1}, {64,1},
1711                     {0,0}
1712                 };
1713                 int i_error;
1714                 int i_idx;
1715                 int i;
1716
1717                 i_rate_sign = p_input->p->i_rate < 0 ? -1 : 1;
1718
1719                 i_error = INT_MAX;
1720                 i_idx = -1;
1721                 for( i = 0; ppi_factor[i][0] != 0; i++ )
1722                 {
1723                     const int i_test_r = INPUT_RATE_DEFAULT * ppi_factor[i][0] / ppi_factor[i][1];
1724                     const int i_test_e = abs( abs( p_input->p->i_rate ) - i_test_r );
1725                     if( i_test_e < i_error )
1726                     {
1727                         i_idx = i;
1728                         i_error = i_test_e;
1729                     }
1730                 }
1731
1732                 assert( i_idx >= 0 && ppi_factor[i_idx][0] != 0 );
1733
1734                 if( i_type == INPUT_CONTROL_SET_RATE_SLOWER )
1735                 {
1736                     if( ppi_factor[i_idx+1][0] > 0 )
1737                         i_rate = INPUT_RATE_DEFAULT * ppi_factor[i_idx+1][0] / ppi_factor[i_idx+1][1];
1738                     else
1739                         i_rate = INPUT_RATE_MAX+1;
1740                 }
1741                 else
1742                 {
1743                     assert( i_type == INPUT_CONTROL_SET_RATE_FASTER );
1744                     if( i_idx > 0 )
1745                         i_rate = INPUT_RATE_DEFAULT * ppi_factor[i_idx-1][0] / ppi_factor[i_idx-1][1];
1746                     else
1747                         i_rate = INPUT_RATE_MIN-1;
1748                 }
1749             }
1750
1751             /* Check rate bound */
1752             if( i_rate < INPUT_RATE_MIN )
1753             {
1754                 msg_Dbg( p_input, "cannot set rate faster" );
1755                 i_rate = INPUT_RATE_MIN;
1756             }
1757             else if( i_rate > INPUT_RATE_MAX )
1758             {
1759                 msg_Dbg( p_input, "cannot set rate slower" );
1760                 i_rate = INPUT_RATE_MAX;
1761             }
1762
1763             /* Apply direction */
1764             if( i_rate_sign < 0 )
1765             {
1766                 if( p_input->p->input.b_rescale_ts )
1767                 {
1768                     msg_Dbg( p_input, "cannot set negative rate" );
1769                     i_rate = p_input->p->i_rate;
1770                     assert( i_rate > 0 );
1771                 }
1772                 else
1773                 {
1774                     i_rate *= i_rate_sign;
1775                 }
1776             }
1777
1778             if( i_rate != INPUT_RATE_DEFAULT &&
1779                 ( ( !p_input->p->b_can_rate_control && !p_input->p->input.b_rescale_ts ) ||
1780                   ( p_input->p->p_sout && !p_input->p->b_out_pace_control ) ) )
1781             {
1782                 msg_Dbg( p_input, "cannot change rate" );
1783                 i_rate = INPUT_RATE_DEFAULT;
1784             }
1785             if( i_rate != p_input->p->i_rate &&
1786                 !p_input->p->b_can_pace_control && p_input->p->b_can_rate_control )
1787             {
1788                 int i_ret;
1789                 if( p_input->p->input.p_access )
1790                 {
1791                     i_ret = VLC_EGENERIC;
1792                 }
1793                 else
1794                 {
1795                     if( !p_input->p->input.b_rescale_ts )
1796                         es_out_Control( p_input->p->p_es_out, ES_OUT_RESET_PCR );
1797
1798                     i_ret = demux_Control( p_input->p->input.p_demux,
1799                                             DEMUX_SET_RATE, &i_rate );
1800                 }
1801                 if( i_ret )
1802                 {
1803                     msg_Warn( p_input, "ACCESS/DEMUX_SET_RATE failed" );
1804                     i_rate = p_input->p->i_rate;
1805                 }
1806             }
1807
1808             /* */
1809             if( i_rate != p_input->p->i_rate )
1810             {
1811                 p_input->p->i_rate = i_rate;
1812                 input_SendEventRate( p_input, i_rate );
1813
1814                 if( p_input->p->input.b_rescale_ts )
1815                 {
1816                     const int i_rate_source = (p_input->p->b_can_pace_control || p_input->p->b_can_rate_control ) ? i_rate : INPUT_RATE_DEFAULT;
1817                     es_out_SetRate( p_input->p->p_es_out, i_rate_source, i_rate );
1818                 }
1819
1820                 b_force_update = true;
1821             }
1822             break;
1823         }
1824
1825         case INPUT_CONTROL_SET_PROGRAM:
1826             /* No need to force update, es_out does it if needed */
1827             es_out_Control( p_input->p->p_es_out,
1828                             ES_OUT_SET_GROUP, val.i_int );
1829
1830             demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, val.i_int,
1831                             NULL );
1832             break;
1833
1834         case INPUT_CONTROL_SET_ES:
1835             /* No need to force update, es_out does it if needed */
1836             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_BY_ID, val.i_int );
1837             break;
1838
1839         case INPUT_CONTROL_RESTART_ES:
1840             es_out_Control( p_input->p->p_es_out_display, ES_OUT_RESTART_ES_BY_ID, val.i_int );
1841             break;
1842
1843         case INPUT_CONTROL_SET_AUDIO_DELAY:
1844             if( !es_out_SetDelay( p_input->p->p_es_out_display, AUDIO_ES, val.i_time ) )
1845             {
1846                 input_SendEventAudioDelay( p_input, val.i_time );
1847                 UpdatePtsDelay( p_input );
1848             }
1849             break;
1850
1851         case INPUT_CONTROL_SET_SPU_DELAY:
1852             if( !es_out_SetDelay( p_input->p->p_es_out_display, SPU_ES, val.i_time ) )
1853             {
1854                 input_SendEventSubtitleDelay( p_input, val.i_time );
1855                 UpdatePtsDelay( p_input );
1856             }
1857             break;
1858
1859         case INPUT_CONTROL_SET_TITLE:
1860         case INPUT_CONTROL_SET_TITLE_NEXT:
1861         case INPUT_CONTROL_SET_TITLE_PREV:
1862             if( p_input->p->b_recording )
1863             {
1864                 msg_Err( p_input, "INPUT_CONTROL_SET_TITLE(*) ignored while recording" );
1865                 break;
1866             }
1867             if( p_input->p->input.b_title_demux &&
1868                 p_input->p->input.i_title > 0 )
1869             {
1870                 /* TODO */
1871                 /* FIXME handle demux title */
1872                 demux_t *p_demux = p_input->p->input.p_demux;
1873                 int i_title;
1874
1875                 if( i_type == INPUT_CONTROL_SET_TITLE_PREV )
1876                     i_title = p_demux->info.i_title - 1;
1877                 else if( i_type == INPUT_CONTROL_SET_TITLE_NEXT )
1878                     i_title = p_demux->info.i_title + 1;
1879                 else
1880                     i_title = val.i_int;
1881
1882                 if( i_title >= 0 && i_title < p_input->p->input.i_title )
1883                 {
1884                     es_out_SetTime( p_input->p->p_es_out, -1 );
1885
1886                     demux_Control( p_demux, DEMUX_SET_TITLE, i_title );
1887                     input_SendEventTitle( p_input, i_title );
1888                 }
1889             }
1890             else if( p_input->p->input.i_title > 0 )
1891             {
1892                 access_t *p_access = p_input->p->input.p_access;
1893                 int i_title;
1894
1895                 if( i_type == INPUT_CONTROL_SET_TITLE_PREV )
1896                     i_title = p_access->info.i_title - 1;
1897                 else if( i_type == INPUT_CONTROL_SET_TITLE_NEXT )
1898                     i_title = p_access->info.i_title + 1;
1899                 else
1900                     i_title = val.i_int;
1901
1902                 if( i_title >= 0 && i_title < p_input->p->input.i_title )
1903                 {
1904                     es_out_SetTime( p_input->p->p_es_out, -1 );
1905
1906                     stream_Control( p_input->p->input.p_stream, STREAM_CONTROL_ACCESS,
1907                                     ACCESS_SET_TITLE, i_title );
1908                     input_SendEventTitle( p_input, i_title );
1909                 }
1910             }
1911             break;
1912         case INPUT_CONTROL_SET_SEEKPOINT:
1913         case INPUT_CONTROL_SET_SEEKPOINT_NEXT:
1914         case INPUT_CONTROL_SET_SEEKPOINT_PREV:
1915             if( p_input->p->b_recording )
1916             {
1917                 msg_Err( p_input, "INPUT_CONTROL_SET_SEEKPOINT(*) ignored while recording" );
1918                 break;
1919             }
1920
1921             if( p_input->p->input.b_title_demux &&
1922                 p_input->p->input.i_title > 0 )
1923             {
1924                 demux_t *p_demux = p_input->p->input.p_demux;
1925                 int i_seekpoint;
1926                 int64_t i_input_time;
1927                 int64_t i_seekpoint_time;
1928
1929                 if( i_type == INPUT_CONTROL_SET_SEEKPOINT_PREV )
1930                 {
1931                     i_seekpoint = p_demux->info.i_seekpoint;
1932                     i_seekpoint_time = p_input->p->input.title[p_demux->info.i_title]->seekpoint[i_seekpoint]->i_time_offset;
1933                     i_input_time = var_GetTime( p_input, "time" );
1934                     if( i_seekpoint_time >= 0 && i_input_time >= 0 )
1935                     {
1936                         if( i_input_time < i_seekpoint_time + 3000000 )
1937                             i_seekpoint--;
1938                     }
1939                     else
1940                         i_seekpoint--;
1941                 }
1942                 else if( i_type == INPUT_CONTROL_SET_SEEKPOINT_NEXT )
1943                     i_seekpoint = p_demux->info.i_seekpoint + 1;
1944                 else
1945                     i_seekpoint = val.i_int;
1946
1947                 if( i_seekpoint >= 0 && i_seekpoint <
1948                     p_input->p->input.title[p_demux->info.i_title]->i_seekpoint )
1949                 {
1950
1951                     es_out_SetTime( p_input->p->p_es_out, -1 );
1952
1953                     demux_Control( p_demux, DEMUX_SET_SEEKPOINT, i_seekpoint );
1954                     input_SendEventSeekpoint( p_input, p_demux->info.i_title, i_seekpoint );
1955                 }
1956             }
1957             else if( p_input->p->input.i_title > 0 )
1958             {
1959                 access_t *p_access = p_input->p->input.p_access;
1960                 int i_seekpoint;
1961                 int64_t i_input_time;
1962                 int64_t i_seekpoint_time;
1963
1964                 if( i_type == INPUT_CONTROL_SET_SEEKPOINT_PREV )
1965                 {
1966                     i_seekpoint = p_access->info.i_seekpoint;
1967                     i_seekpoint_time = p_input->p->input.title[p_access->info.i_title]->seekpoint[i_seekpoint]->i_time_offset;
1968                     i_input_time = var_GetTime( p_input, "time" );
1969                     if( i_seekpoint_time >= 0 && i_input_time >= 0 )
1970                     {
1971                         if( i_input_time < i_seekpoint_time + 3000000 )
1972                             i_seekpoint--;
1973                     }
1974                     else
1975                         i_seekpoint--;
1976                 }
1977                 else if( i_type == INPUT_CONTROL_SET_SEEKPOINT_NEXT )
1978                     i_seekpoint = p_access->info.i_seekpoint + 1;
1979                 else
1980                     i_seekpoint = val.i_int;
1981
1982                 if( i_seekpoint >= 0 && i_seekpoint <
1983                     p_input->p->input.title[p_access->info.i_title]->i_seekpoint )
1984                 {
1985                     es_out_SetTime( p_input->p->p_es_out, -1 );
1986
1987                     stream_Control( p_input->p->input.p_stream, STREAM_CONTROL_ACCESS,
1988                                     ACCESS_SET_SEEKPOINT, i_seekpoint );
1989                     input_SendEventSeekpoint( p_input, p_access->info.i_title, i_seekpoint );
1990                 }
1991             }
1992             break;
1993
1994         case INPUT_CONTROL_ADD_SUBTITLE:
1995             if( val.psz_string )
1996                 SubtitleAdd( p_input, val.psz_string, true );
1997             break;
1998
1999         case INPUT_CONTROL_ADD_SLAVE:
2000             if( val.psz_string )
2001             {
2002                 input_source_t *slave = InputSourceNew( p_input );
2003
2004                 if( slave && !InputSourceInit( p_input, slave, val.psz_string, NULL ) )
2005                 {
2006                     vlc_meta_t *p_meta;
2007                     int64_t i_time;
2008
2009                     /* Add the slave */
2010                     msg_Dbg( p_input, "adding %s as slave on the fly",
2011                              val.psz_string );
2012
2013                     /* Set position */
2014                     if( demux_Control( p_input->p->input.p_demux,
2015                                         DEMUX_GET_TIME, &i_time ) )
2016                     {
2017                         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2018                         InputSourceClean( slave );
2019                         free( slave );
2020                         break;
2021                     }
2022                     if( demux_Control( slave->p_demux,
2023                                        DEMUX_SET_TIME, i_time, true ) )
2024                     {
2025                         msg_Err( p_input, "seek failed for new slave" );
2026                         InputSourceClean( slave );
2027                         free( slave );
2028                         break;
2029                     }
2030
2031                     /* Get meta (access and demux) */
2032                     p_meta = vlc_meta_New();
2033                     if( p_meta )
2034                     {
2035                         access_Control( slave->p_access, ACCESS_GET_META, p_meta );
2036                         demux_Control( slave->p_demux, DEMUX_GET_META, p_meta );
2037                         InputUpdateMeta( p_input, p_meta );
2038                     }
2039
2040                     TAB_APPEND( p_input->p->i_slave, p_input->p->slave, slave );
2041                 }
2042                 else
2043                 {
2044                     free( slave );
2045                     msg_Warn( p_input, "failed to add %s as slave",
2046                               val.psz_string );
2047                 }
2048             }
2049             break;
2050
2051         case INPUT_CONTROL_SET_RECORD_STATE:
2052             if( !!p_input->p->b_recording != !!val.b_bool )
2053             {
2054                 if( p_input->p->input.b_can_stream_record )
2055                 {
2056                     if( demux_Control( p_input->p->input.p_demux,
2057                                        DEMUX_SET_RECORD_STATE, val.b_bool ) )
2058                         val.b_bool = false;
2059                 }
2060                 else
2061                 {
2062                     if( es_out_SetRecordState( p_input->p->p_es_out_display, val.b_bool ) )
2063                         val.b_bool = false;
2064                 }
2065                 p_input->p->b_recording = val.b_bool;
2066
2067                 input_SendEventRecord( p_input, val.b_bool );
2068
2069                 b_force_update = true;
2070             }
2071             break;
2072
2073         case INPUT_CONTROL_SET_FRAME_NEXT:
2074             if( p_input->p->i_state == PAUSE_S )
2075             {
2076                 es_out_SetFrameNext( p_input->p->p_es_out );
2077             }
2078             else if( p_input->p->i_state == PLAYING_S )
2079             {
2080                 ControlPause( p_input, i_control_date );
2081             }
2082             else
2083             {
2084                 msg_Err( p_input, "invalid state for frame next" );
2085             }
2086             b_force_update = true;
2087             break;
2088
2089         case INPUT_CONTROL_SET_BOOKMARK:
2090         {
2091             seekpoint_t bookmark;
2092
2093             bookmark.i_time_offset = -1;
2094             bookmark.i_byte_offset = -1;
2095
2096             vlc_mutex_lock( &p_input->p->p_item->lock );
2097             if( val.i_int >= 0 && val.i_int < p_input->p->i_bookmark )
2098             {
2099                 const seekpoint_t *p_bookmark = p_input->p->pp_bookmark[val.i_int];
2100                 bookmark.i_time_offset = p_bookmark->i_time_offset;
2101                 bookmark.i_byte_offset = p_bookmark->i_byte_offset;
2102             }
2103             vlc_mutex_unlock( &p_input->p->p_item->lock );
2104
2105             if( bookmark.i_time_offset < 0 && bookmark.i_byte_offset < 0 )
2106             {
2107                 msg_Err( p_input, "invalid bookmark %d", val.i_int );
2108                 break;
2109             }
2110
2111             if( bookmark.i_time_offset >= 0 )
2112             {
2113                 val.i_time = bookmark.i_time_offset;
2114                 b_force_update = Control( p_input, INPUT_CONTROL_SET_TIME, val );
2115             }
2116             else if( bookmark.i_byte_offset >= 0 &&
2117                      p_input->p->input.p_stream )
2118             {
2119                 const int64_t i_size = stream_Size( p_input->p->input.p_stream );
2120                 if( i_size > 0 && bookmark.i_byte_offset <= i_size )
2121                 {
2122                     val.f_float = (double)bookmark.i_byte_offset / i_size;
2123                     b_force_update = Control( p_input, INPUT_CONTROL_SET_POSITION, val );
2124                 }
2125             }
2126             break;
2127         }
2128
2129         default:
2130             msg_Err( p_input, "not yet implemented" );
2131             break;
2132     }
2133
2134     ControlRelease( i_type, val );
2135     return b_force_update;
2136 }
2137
2138 /*****************************************************************************
2139  * UpdateTitleSeekpoint
2140  *****************************************************************************/
2141 static int UpdateTitleSeekpoint( input_thread_t *p_input,
2142                                  int i_title, int i_seekpoint )
2143 {
2144     int i_title_end = p_input->p->input.i_title_end -
2145                         p_input->p->input.i_title_offset;
2146     int i_seekpoint_end = p_input->p->input.i_seekpoint_end -
2147                             p_input->p->input.i_seekpoint_offset;
2148
2149     if( i_title_end >= 0 && i_seekpoint_end >= 0 )
2150     {
2151         if( i_title > i_title_end ||
2152             ( i_title == i_title_end && i_seekpoint > i_seekpoint_end ) )
2153             return 0;
2154     }
2155     else if( i_seekpoint_end >= 0 )
2156     {
2157         if( i_seekpoint > i_seekpoint_end )
2158             return 0;
2159     }
2160     else if( i_title_end >= 0 )
2161     {
2162         if( i_title > i_title_end )
2163             return 0;
2164     }
2165     return 1;
2166 }
2167 /*****************************************************************************
2168  * Update*FromDemux:
2169  *****************************************************************************/
2170 static int UpdateTitleSeekpointFromDemux( input_thread_t *p_input )
2171 {
2172     demux_t *p_demux = p_input->p->input.p_demux;
2173
2174     /* TODO event-like */
2175     if( p_demux->info.i_update & INPUT_UPDATE_TITLE )
2176     {
2177         input_SendEventTitle( p_input, p_demux->info.i_title );
2178
2179         p_demux->info.i_update &= ~INPUT_UPDATE_TITLE;
2180     }
2181     if( p_demux->info.i_update & INPUT_UPDATE_SEEKPOINT )
2182     {
2183         input_SendEventSeekpoint( p_input,
2184                                   p_demux->info.i_title, p_demux->info.i_seekpoint );
2185
2186         p_demux->info.i_update &= ~INPUT_UPDATE_SEEKPOINT;
2187     }
2188
2189     /* Hmmm only works with master input */
2190     if( p_input->p->input.p_demux == p_demux )
2191         return UpdateTitleSeekpoint( p_input,
2192                                      p_demux->info.i_title,
2193                                      p_demux->info.i_seekpoint );
2194     return 1;
2195 }
2196
2197 static void UpdateGenericFromDemux( input_thread_t *p_input )
2198 {
2199     demux_t *p_demux = p_input->p->input.p_demux;
2200
2201     if( p_demux->info.i_update & INPUT_UPDATE_META )
2202     {
2203         vlc_meta_t *p_meta = vlc_meta_New();
2204         if( p_meta )
2205         {
2206             demux_Control( p_input->p->input.p_demux, DEMUX_GET_META, p_meta );
2207             InputUpdateMeta( p_input, p_meta );
2208         }
2209         p_demux->info.i_update &= ~INPUT_UPDATE_META;
2210     }
2211
2212     p_demux->info.i_update &= ~INPUT_UPDATE_SIZE;
2213 }
2214
2215
2216 /*****************************************************************************
2217  * Update*FromAccess:
2218  *****************************************************************************/
2219 static int UpdateTitleSeekpointFromAccess( input_thread_t *p_input )
2220 {
2221     access_t *p_access = p_input->p->input.p_access;
2222
2223     if( p_access->info.i_update & INPUT_UPDATE_TITLE )
2224     {
2225         input_SendEventTitle( p_input, p_access->info.i_title );
2226
2227         stream_Control( p_input->p->input.p_stream, STREAM_UPDATE_SIZE );
2228
2229         p_access->info.i_update &= ~INPUT_UPDATE_TITLE;
2230     }
2231     if( p_access->info.i_update & INPUT_UPDATE_SEEKPOINT )
2232     {
2233         input_SendEventSeekpoint( p_input,
2234                                   p_access->info.i_title, p_access->info.i_seekpoint );
2235
2236         p_access->info.i_update &= ~INPUT_UPDATE_SEEKPOINT;
2237     }
2238     /* Hmmm only works with master input */
2239     if( p_input->p->input.p_access == p_access )
2240         return UpdateTitleSeekpoint( p_input,
2241                                      p_access->info.i_title,
2242                                      p_access->info.i_seekpoint );
2243     return 1;
2244 }
2245 static void UpdateGenericFromAccess( input_thread_t *p_input )
2246 {
2247     access_t *p_access = p_input->p->input.p_access;
2248
2249     if( p_access->info.i_update & INPUT_UPDATE_META )
2250     {
2251         /* TODO maybe multi - access ? */
2252         vlc_meta_t *p_meta = vlc_meta_New();
2253         if( p_meta )
2254         {
2255             access_Control( p_input->p->input.p_access, ACCESS_GET_META, p_meta );
2256             InputUpdateMeta( p_input, p_meta );
2257         }
2258         p_access->info.i_update &= ~INPUT_UPDATE_META;
2259     }
2260     if( p_access->info.i_update & INPUT_UPDATE_SIGNAL )
2261     {
2262         double f_quality;
2263         double f_strength;
2264
2265         if( access_Control( p_access, ACCESS_GET_SIGNAL, &f_quality, &f_strength ) )
2266             f_quality = f_strength = -1;
2267
2268         input_SendEventSignal( p_input, f_quality, f_strength );
2269
2270         p_access->info.i_update &= ~INPUT_UPDATE_SIGNAL;
2271     }
2272
2273     p_access->info.i_update &= ~INPUT_UPDATE_SIZE;
2274 }
2275
2276 /*****************************************************************************
2277  * InputSourceNew:
2278  *****************************************************************************/
2279 static input_source_t *InputSourceNew( input_thread_t *p_input )
2280 {
2281     VLC_UNUSED(p_input);
2282
2283     return calloc( 1,  sizeof( input_source_t ) );
2284 }
2285
2286 /*****************************************************************************
2287  * InputSourceInit:
2288  *****************************************************************************/
2289 static int InputSourceInit( input_thread_t *p_input,
2290                             input_source_t *in, const char *psz_mrl,
2291                             const char *psz_forced_demux )
2292 {
2293     const char *psz_access;
2294     const char *psz_demux;
2295     char *psz_path;
2296     char *psz_var_demux = NULL;
2297     double f_fps;
2298
2299     assert( psz_mrl );
2300     char *psz_dup = strdup( psz_mrl );
2301
2302     if( psz_dup == NULL )
2303         goto error;
2304
2305     /* Split uri */
2306     input_SplitMRL( &psz_access, &psz_demux, &psz_path, psz_dup );
2307
2308     /* FIXME: file:// handling plugins do not support URIs properly...
2309      * So we pre-decoded the URI to a path for them. Note that we do not do it
2310      * for non-standard VLC-specific schemes. */
2311     if( !strcmp( psz_access, "file" ) )
2312     {
2313         if( psz_path[0] != '/'
2314 #if (DIR_SEP_CHAR != '/')
2315             /* We accept invalid URIs too. */
2316             && psz_path[0] != DIR_SEP_CHAR
2317 #endif
2318           )
2319         {   /* host specified -> only localhost is supported */
2320             static const size_t i_localhost = sizeof("localhost")-1;
2321             if( strncmp( psz_path, "localhost/", i_localhost + 1) != 0 )
2322             {
2323                 msg_Err( p_input, "cannot open remote file `%s://%s'",
2324                          psz_access, psz_path );
2325                 msg_Info( p_input, "Did you mean `%s:///%s'?",
2326                           psz_access, psz_path );
2327                 goto error;
2328             }
2329             psz_path += i_localhost;
2330         }
2331         /* Remove HTML anchor if present (not supported). */
2332         char *p = strchr( psz_path, '#' );
2333         if( p )
2334             *p = '\0';
2335         /* Then URI-decode the path. */
2336         decode_URI( psz_path );
2337 #if defined( WIN32 ) && !defined( UNDER_CE )
2338         /* Strip leading slash in front of the drive letter */
2339         psz_path++;
2340 #endif
2341 #if (DIR_SEP_CHAR != '/')
2342         /* Turn slashes into anti-slashes */
2343         for( char *s = strchr( psz_path, '/' ); s; s = strchr( s + 1, '/' ) )
2344             *s = DIR_SEP_CHAR;
2345 #endif
2346     }
2347
2348     msg_Dbg( p_input, "`%s' gives access `%s' demux `%s' path `%s'",
2349              psz_mrl, psz_access, psz_demux, psz_path );
2350     if( !p_input->b_preparsing )
2351     {
2352         /* Hack to allow udp://@:port syntax */
2353         if( !psz_access ||
2354             (strncmp( psz_access, "udp", 3 ) &&
2355              strncmp( psz_access, "rtp", 3 )) )
2356         {
2357             /* Find optional titles and seekpoints */
2358             MRLSections( p_input, psz_path, &in->i_title_start, &in->i_title_end,
2359                      &in->i_seekpoint_start, &in->i_seekpoint_end );
2360         }
2361
2362         if( psz_forced_demux && *psz_forced_demux )
2363         {
2364             psz_demux = psz_forced_demux;
2365         }
2366         else if( *psz_demux == '\0' )
2367         {
2368             /* special hack for forcing a demuxer with --demux=module
2369              * (and do nothing with a list) */
2370             psz_var_demux = var_GetNonEmptyString( p_input, "demux" );
2371
2372             if( psz_var_demux != NULL &&
2373                 !strchr(psz_var_demux, ',' ) &&
2374                 !strchr(psz_var_demux, ':' ) )
2375             {
2376                 psz_demux = psz_var_demux;
2377
2378                 msg_Dbg( p_input, "enforced demux ` %s'", psz_demux );
2379             }
2380         }
2381
2382         /* Try access_demux first */
2383         in->p_demux = demux_New( p_input, p_input, psz_access, psz_demux, psz_path,
2384                                   NULL, p_input->p->p_es_out, false );
2385     }
2386     else
2387     {
2388         /* Preparsing is only for file:// */
2389         if( *psz_demux )
2390             goto error;
2391         if( !*psz_access ) /* path without scheme:// */
2392             psz_access = "file";
2393         if( strcmp( psz_access, "file" ) )
2394             goto error;
2395         msg_Dbg( p_input, "trying to pre-parse %s",  psz_path );
2396     }
2397
2398     if( in->p_demux )
2399     {
2400         /* Get infos from access_demux */
2401         int i_ret = demux_Control( in->p_demux,
2402                                    DEMUX_GET_PTS_DELAY, &in->i_pts_delay );
2403         assert( !i_ret );
2404         in->i_pts_delay = __MAX( 0, __MIN( in->i_pts_delay, INPUT_PTS_DELAY_MAX ) );
2405
2406
2407         in->b_title_demux = true;
2408         if( demux_Control( in->p_demux, DEMUX_GET_TITLE_INFO,
2409                             &in->title, &in->i_title,
2410                             &in->i_title_offset, &in->i_seekpoint_offset ) )
2411         {
2412             TAB_INIT( in->i_title, in->title );
2413         }
2414         if( demux_Control( in->p_demux, DEMUX_CAN_CONTROL_PACE,
2415                             &in->b_can_pace_control ) )
2416             in->b_can_pace_control = false;
2417
2418         assert( in->p_demux->pf_demux != NULL || !in->b_can_pace_control );
2419
2420         if( !in->b_can_pace_control )
2421         {
2422             if( demux_Control( in->p_demux, DEMUX_CAN_CONTROL_RATE,
2423                                 &in->b_can_rate_control, &in->b_rescale_ts ) )
2424             {
2425                 in->b_can_rate_control = false;
2426                 in->b_rescale_ts = true; /* not used */
2427             }
2428         }
2429         else
2430         {
2431             in->b_can_rate_control = true;
2432             in->b_rescale_ts = true;
2433         }
2434         if( demux_Control( in->p_demux, DEMUX_CAN_PAUSE,
2435                             &in->b_can_pause ) )
2436             in->b_can_pause = false;
2437         var_SetBool( p_input, "can-pause", in->b_can_pause || !in->b_can_pace_control ); /* XXX temporary because of es_out_timeshift*/
2438         var_SetBool( p_input, "can-rate", !in->b_can_pace_control || in->b_can_rate_control ); /* XXX temporary because of es_out_timeshift*/
2439         var_SetBool( p_input, "can-rewind", !in->b_rescale_ts && !in->b_can_pace_control && in->b_can_rate_control );
2440
2441         bool b_can_seek;
2442         if( demux_Control( in->p_demux, DEMUX_CAN_SEEK, &b_can_seek ) )
2443             b_can_seek = false;
2444         var_SetBool( p_input, "can-seek", b_can_seek );
2445     }
2446     else
2447     {
2448         /* Now try a real access */
2449         in->p_access = access_New( p_input, p_input, psz_access, psz_demux, psz_path );
2450         if( in->p_access == NULL )
2451         {
2452             if( vlc_object_alive( p_input ) )
2453             {
2454                 msg_Err( p_input, "open of `%s' failed: %s", psz_mrl,
2455                                                              msg_StackMsg() );
2456                 dialog_Fatal( p_input, _("Your input can't be opened"),
2457                               _("VLC is unable to open the MRL '%s'."
2458                                 " Check the log for details."), psz_mrl );
2459             }
2460             goto error;
2461         }
2462
2463         /* Get infos from access */
2464         if( !p_input->b_preparsing )
2465         {
2466             bool b_can_seek;
2467             access_Control( in->p_access,
2468                              ACCESS_GET_PTS_DELAY, &in->i_pts_delay );
2469             in->i_pts_delay = __MAX( 0, __MIN( in->i_pts_delay, INPUT_PTS_DELAY_MAX ) );
2470
2471             in->b_title_demux = false;
2472             if( access_Control( in->p_access, ACCESS_GET_TITLE_INFO,
2473                                  &in->title, &in->i_title,
2474                                 &in->i_title_offset, &in->i_seekpoint_offset ) )
2475
2476             {
2477                 TAB_INIT( in->i_title, in->title );
2478             }
2479             access_Control( in->p_access, ACCESS_CAN_CONTROL_PACE,
2480                              &in->b_can_pace_control );
2481             in->b_can_rate_control = in->b_can_pace_control;
2482             in->b_rescale_ts = true;
2483
2484             access_Control( in->p_access, ACCESS_CAN_PAUSE, &in->b_can_pause );
2485             var_SetBool( p_input, "can-pause", in->b_can_pause || !in->b_can_pace_control ); /* XXX temporary because of es_out_timeshift*/
2486             var_SetBool( p_input, "can-rate", !in->b_can_pace_control || in->b_can_rate_control ); /* XXX temporary because of es_out_timeshift*/
2487             var_SetBool( p_input, "can-rewind", !in->b_rescale_ts && !in->b_can_pace_control );
2488
2489             access_Control( in->p_access, ACCESS_CAN_SEEK, &b_can_seek );
2490             var_SetBool( p_input, "can-seek", b_can_seek );
2491         }
2492
2493         /* */
2494         int  i_input_list;
2495         char **ppsz_input_list;
2496
2497         TAB_INIT( i_input_list, ppsz_input_list );
2498
2499         /* On master stream only, use input-list */
2500         if( &p_input->p->input == in )
2501         {
2502             char *psz_list;
2503             char *psz_parser;
2504
2505             psz_list =
2506             psz_parser = var_CreateGetNonEmptyString( p_input, "input-list" );
2507
2508             while( psz_parser && *psz_parser )
2509             {
2510                 char *p = strchr( psz_parser, ',' );
2511                 if( p )
2512                     *p++ = '\0';
2513
2514                 if( *psz_parser )
2515                 {
2516                     char *psz_name = strdup( psz_parser );
2517                     if( psz_name )
2518                         TAB_APPEND( i_input_list, ppsz_input_list, psz_name );
2519                 }
2520
2521                 psz_parser = p;
2522             }
2523             free( psz_list );
2524         }
2525         /* Autodetect extra files if none specified */
2526         if( i_input_list <= 0 )
2527         {
2528             InputGetExtraFiles( p_input, &i_input_list, &ppsz_input_list,
2529                                 psz_access, psz_path );
2530         }
2531         if( i_input_list > 0 )
2532             TAB_APPEND( i_input_list, ppsz_input_list, NULL );
2533
2534         /* Create the stream_t */
2535         in->p_stream = stream_AccessNew( in->p_access, ppsz_input_list );
2536         if( ppsz_input_list )
2537         {
2538             for( int i = 0; ppsz_input_list[i] != NULL; i++ )
2539                 free( ppsz_input_list[i] );
2540             TAB_CLEAN( i_input_list, ppsz_input_list );
2541         }
2542
2543         if( in->p_stream == NULL )
2544         {
2545             msg_Warn( p_input, "cannot create a stream_t from access" );
2546             goto error;
2547         }
2548
2549         /* Add stream filters */
2550         char *psz_stream_filter = var_GetNonEmptyString( p_input,
2551                                                          "stream-filter" );
2552         in->p_stream = stream_FilterChainNew( in->p_stream,
2553                                               psz_stream_filter,
2554                                               var_GetBool( p_input, "input-record-native" ) );
2555         free( psz_stream_filter );
2556
2557         /* Open a demuxer */
2558         if( *psz_demux == '\0' && *in->p_access->psz_demux )
2559         {
2560             psz_demux = in->p_access->psz_demux;
2561         }
2562
2563         {
2564             /* Take access/stream redirections into account */
2565             char *psz_real_path;
2566             char *psz_buf = NULL;
2567             if( in->p_stream->psz_path )
2568             {
2569                 const char *psz_a, *psz_d;
2570                 psz_buf = strdup( in->p_stream->psz_path );
2571                 input_SplitMRL( &psz_a, &psz_d, &psz_real_path, psz_buf );
2572             }
2573             else
2574             {
2575                 psz_real_path = psz_path;
2576             }
2577             in->p_demux = demux_New( p_input, p_input, psz_access, psz_demux,
2578                                       psz_real_path,
2579                                       in->p_stream, p_input->p->p_es_out,
2580                                       p_input->b_preparsing );
2581             free( psz_buf );
2582         }
2583
2584         if( in->p_demux == NULL )
2585         {
2586             if( vlc_object_alive( p_input ) )
2587             {
2588                 msg_Err( p_input, "no suitable demux module for `%s/%s://%s'",
2589                          psz_access, psz_demux, psz_path );
2590                 dialog_Fatal( VLC_OBJECT( p_input ),
2591                               _("VLC can't recognize the input's format"),
2592                               _("The format of '%s' cannot be detected. "
2593                                 "Have a look at the log for details."), psz_mrl );
2594             }
2595             goto error;
2596         }
2597         assert( in->p_demux->pf_demux != NULL );
2598
2599         /* Get title from demux */
2600         if( !p_input->b_preparsing && in->i_title <= 0 )
2601         {
2602             if( demux_Control( in->p_demux, DEMUX_GET_TITLE_INFO,
2603                                 &in->title, &in->i_title,
2604                                 &in->i_title_offset, &in->i_seekpoint_offset ))
2605             {
2606                 TAB_INIT( in->i_title, in->title );
2607             }
2608             else
2609             {
2610                 in->b_title_demux = true;
2611             }
2612         }
2613     }
2614
2615     free( psz_var_demux );
2616     free( psz_dup );
2617
2618     /* Set record capabilities */
2619     if( demux_Control( in->p_demux, DEMUX_CAN_RECORD, &in->b_can_stream_record ) )
2620         in->b_can_stream_record = false;
2621 #ifdef ENABLE_SOUT
2622     if( !var_GetBool( p_input, "input-record-native" ) )
2623         in->b_can_stream_record = false;
2624     var_SetBool( p_input, "can-record", true );
2625 #else
2626     var_SetBool( p_input, "can-record", in->b_can_stream_record );
2627 #endif
2628
2629     /* get attachment
2630      * FIXME improve for b_preparsing: move it after GET_META and check psz_arturl */
2631     if( 1 || !p_input->b_preparsing )
2632     {
2633         int i_attachment;
2634         input_attachment_t **attachment;
2635         if( !demux_Control( in->p_demux, DEMUX_GET_ATTACHMENTS,
2636                              &attachment, &i_attachment ) )
2637         {
2638             vlc_mutex_lock( &p_input->p->p_item->lock );
2639             AppendAttachment( &p_input->p->i_attachment, &p_input->p->attachment,
2640                               i_attachment, attachment );
2641             vlc_mutex_unlock( &p_input->p->p_item->lock );
2642         }
2643     }
2644     if( !demux_Control( in->p_demux, DEMUX_GET_FPS, &f_fps ) && f_fps > 0.0 )
2645     {
2646         vlc_mutex_lock( &p_input->p->p_item->lock );
2647         p_input->p->f_fps = f_fps;
2648         vlc_mutex_unlock( &p_input->p->p_item->lock );
2649     }
2650
2651     if( var_GetInteger( p_input, "clock-synchro" ) != -1 )
2652         in->b_can_pace_control = !var_GetInteger( p_input, "clock-synchro" );
2653
2654     return VLC_SUCCESS;
2655
2656 error:
2657     if( in->p_demux )
2658         demux_Delete( in->p_demux );
2659
2660     if( in->p_stream )
2661         stream_Delete( in->p_stream );
2662
2663     if( in->p_access )
2664         access_Delete( in->p_access );
2665
2666     free( psz_var_demux );
2667     free( psz_dup );
2668
2669     return VLC_EGENERIC;
2670 }
2671
2672 /*****************************************************************************
2673  * InputSourceClean:
2674  *****************************************************************************/
2675 static void InputSourceClean( input_source_t *in )
2676 {
2677     int i;
2678
2679     if( in->p_demux )
2680         demux_Delete( in->p_demux );
2681
2682     if( in->p_stream )
2683         stream_Delete( in->p_stream );
2684
2685     if( in->p_access )
2686         access_Delete( in->p_access );
2687
2688     if( in->i_title > 0 )
2689     {
2690         for( i = 0; i < in->i_title; i++ )
2691             vlc_input_title_Delete( in->title[i] );
2692         TAB_CLEAN( in->i_title, in->title );
2693     }
2694 }
2695
2696 /*****************************************************************************
2697  * InputSourceMeta:
2698  *****************************************************************************/
2699 static void InputSourceMeta( input_thread_t *p_input,
2700                              input_source_t *p_source, vlc_meta_t *p_meta )
2701 {
2702     access_t *p_access = p_source->p_access;
2703     demux_t *p_demux = p_source->p_demux;
2704
2705     /* XXX Remember that checking against p_item->p_meta->i_status & ITEM_PREPARSED
2706      * is a bad idea */
2707
2708     /* Read access meta */
2709     if( p_access )
2710         access_Control( p_access, ACCESS_GET_META, p_meta );
2711
2712     /* Read demux meta */
2713     demux_Control( p_demux, DEMUX_GET_META, p_meta );
2714
2715     /* If the demux report unsupported meta data, try an external "meta reader" */
2716     bool b_bool;
2717     if( demux_Control( p_demux, DEMUX_HAS_UNSUPPORTED_META, &b_bool ) )
2718         return;
2719     if( !b_bool )
2720         return;
2721
2722     demux_meta_t *p_demux_meta =
2723         vlc_custom_create( p_demux, sizeof( *p_demux_meta ),
2724                            VLC_OBJECT_GENERIC, "demux meta" );
2725     if( !p_demux_meta )
2726         return;
2727     p_demux_meta->p_demux = p_demux;
2728
2729     module_t *p_id3 = module_need( p_demux_meta, "meta reader", NULL, false );
2730     if( p_id3 )
2731     {
2732         if( p_demux_meta->p_meta )
2733         {
2734             vlc_meta_Merge( p_meta, p_demux_meta->p_meta );
2735             vlc_meta_Delete( p_demux_meta->p_meta );
2736         }
2737
2738         if( p_demux_meta->i_attachments > 0 )
2739         {
2740             vlc_mutex_lock( &p_input->p->p_item->lock );
2741             AppendAttachment( &p_input->p->i_attachment, &p_input->p->attachment,
2742                               p_demux_meta->i_attachments, p_demux_meta->attachments );
2743             vlc_mutex_unlock( &p_input->p->p_item->lock );
2744         }
2745         module_unneed( p_demux, p_id3 );
2746     }
2747     vlc_object_release( p_demux_meta );
2748 }
2749
2750
2751 static void SlaveDemux( input_thread_t *p_input, bool *pb_demux_polled )
2752 {
2753     int64_t i_time;
2754     int i;
2755
2756     *pb_demux_polled = false;
2757     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_TIME, &i_time ) )
2758     {
2759         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2760         return;
2761     }
2762
2763     for( i = 0; i < p_input->p->i_slave; i++ )
2764     {
2765         input_source_t *in = p_input->p->slave[i];
2766         int i_ret;
2767
2768         if( in->b_eof )
2769             continue;
2770
2771         const bool b_demux_polled = in->p_demux->pf_demux != NULL;
2772         if( !b_demux_polled )
2773             continue;
2774
2775         *pb_demux_polled = true;
2776
2777         /* Call demux_Demux until we have read enough data */
2778         if( demux_Control( in->p_demux, DEMUX_SET_NEXT_DEMUX_TIME, i_time ) )
2779         {
2780             for( ;; )
2781             {
2782                 int64_t i_stime;
2783                 if( demux_Control( in->p_demux, DEMUX_GET_TIME, &i_stime ) )
2784                 {
2785                     msg_Err( p_input, "slave[%d] doesn't like "
2786                              "DEMUX_GET_TIME -> EOF", i );
2787                     i_ret = 0;
2788                     break;
2789                 }
2790
2791                 if( i_stime >= i_time )
2792                 {
2793                     i_ret = 1;
2794                     break;
2795                 }
2796
2797                 if( ( i_ret = demux_Demux( in->p_demux ) ) <= 0 )
2798                     break;
2799             }
2800         }
2801         else
2802         {
2803             i_ret = demux_Demux( in->p_demux );
2804         }
2805
2806         if( i_ret <= 0 )
2807         {
2808             msg_Dbg( p_input, "slave %d EOF", i );
2809             in->b_eof = true;
2810         }
2811     }
2812 }
2813
2814 static void SlaveSeek( input_thread_t *p_input )
2815 {
2816     int64_t i_time;
2817     int i;
2818
2819     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_TIME, &i_time ) )
2820     {
2821         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2822         return;
2823     }
2824
2825     for( i = 0; i < p_input->p->i_slave; i++ )
2826     {
2827         input_source_t *in = p_input->p->slave[i];
2828
2829         if( demux_Control( in->p_demux, DEMUX_SET_TIME, i_time, true ) )
2830         {
2831             if( !in->b_eof )
2832                 msg_Err( p_input, "seek failed for slave %d -> EOF", i );
2833             in->b_eof = true;
2834         }
2835         else
2836         {
2837             in->b_eof = false;
2838         }
2839     }
2840 }
2841
2842 /*****************************************************************************
2843  * InputMetaUser:
2844  *****************************************************************************/
2845 static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta )
2846 {
2847     static const struct { int i_meta; const char *psz_name; } p_list[] = {
2848         { vlc_meta_Title,       "meta-title" },
2849         { vlc_meta_Artist,      "meta-artist" },
2850         { vlc_meta_Genre,       "meta-genre" },
2851         { vlc_meta_Copyright,   "meta-copyright" },
2852         { vlc_meta_Description, "meta-description" },
2853         { vlc_meta_Date,        "meta-date" },
2854         { vlc_meta_URL,         "meta-url" },
2855         { 0, NULL }
2856     };
2857
2858     /* Get meta information from user */
2859     for( int i = 0; p_list[i].psz_name; i++ )
2860     {
2861         char *psz_string = var_GetNonEmptyString( p_input, p_list[i].psz_name );
2862         if( !psz_string )
2863             continue;
2864
2865         EnsureUTF8( psz_string );
2866         vlc_meta_Set( p_meta, p_list[i].i_meta, psz_string );
2867         free( psz_string );
2868     }
2869 }
2870
2871 /*****************************************************************************
2872  * InputUpdateMeta: merge p_item meta data with p_meta taking care of
2873  * arturl and locking issue.
2874  *****************************************************************************/
2875 static void InputUpdateMeta( input_thread_t *p_input, vlc_meta_t *p_meta )
2876 {
2877     es_out_ControlSetMeta( p_input->p->p_es_out, p_meta );
2878     vlc_meta_Delete( p_meta );
2879 }
2880
2881 static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
2882                               int i_new, input_attachment_t **pp_new )
2883 {
2884     int i_attachment = *pi_attachment;
2885     input_attachment_t **attachment = *ppp_attachment;
2886     int i;
2887
2888     attachment = realloc( attachment,
2889                           sizeof(input_attachment_t**) * ( i_attachment + i_new ) );
2890     for( i = 0; i < i_new; i++ )
2891         attachment[i_attachment++] = pp_new[i];
2892     free( pp_new );
2893
2894     /* */
2895     *pi_attachment = i_attachment;
2896     *ppp_attachment = attachment;
2897 }
2898 /*****************************************************************************
2899  * InputGetExtraFiles
2900  *  Autodetect extra input list
2901  *****************************************************************************/
2902 static void InputGetExtraFilesPattern( input_thread_t *p_input,
2903                                        int *pi_list, char ***pppsz_list,
2904                                        const char *psz_path,
2905                                        const char *psz_match,
2906                                        const char *psz_format,
2907                                        int i_start, int i_stop )
2908 {
2909     int i_list;
2910     char **ppsz_list;
2911
2912     TAB_INIT( i_list, ppsz_list );
2913
2914     char *psz_base = strdup( psz_path );
2915     if( !psz_base )
2916         goto exit;
2917
2918     /* Remove the extension */
2919     char *psz_end = &psz_base[strlen(psz_base)-strlen(psz_match)];
2920     assert( psz_end >= psz_base);
2921     *psz_end = '\0';
2922
2923     /* Try to list files */
2924     for( int i = i_start; i <= i_stop; i++ )
2925     {
2926         struct stat st;
2927         char *psz_file;
2928
2929         if( asprintf( &psz_file, psz_format, psz_base, i ) < 0 )
2930             break;
2931
2932         if( utf8_stat( psz_file, &st ) || !S_ISREG( st.st_mode ) || !st.st_size )
2933         {
2934             free( psz_file );
2935             break;
2936         }
2937
2938         msg_Dbg( p_input, "Detected extra file `%s'", psz_file );
2939         TAB_APPEND( i_list, ppsz_list, psz_file );
2940     }
2941     free( psz_base );
2942 exit:
2943     *pi_list = i_list;
2944     *pppsz_list = ppsz_list;
2945 }
2946
2947 static void InputGetExtraFiles( input_thread_t *p_input,
2948                                 int *pi_list, char ***pppsz_list,
2949                                 const char *psz_access, const char *psz_path )
2950 {
2951     static const struct
2952     {
2953         const char *psz_match;
2954         const char *psz_format;
2955         int i_start;
2956         int i_stop;
2957     } p_pattern[] = {
2958         /* XXX the order is important */
2959         { ".001",         "%s.%.3d",        2, 999 },
2960         { ".part1.rar",   "%s.part%.1d.rar",2, 9 },
2961         { ".part01.rar",  "%s.part%.2d.rar",2, 99, },
2962         { ".part001.rar", "%s.part%.3d.rar",2, 999 },
2963         { ".rar",         "%s.r%.2d",       0, 99 },
2964         { NULL, NULL, 0, 0 }
2965     };
2966
2967     TAB_INIT( *pi_list, *pppsz_list );
2968
2969     if( ( psz_access && *psz_access && strcmp( psz_access, "file" ) ) || !psz_path )
2970         return;
2971
2972     const size_t i_path = strlen(psz_path);
2973
2974     for( int i = 0; p_pattern[i].psz_match != NULL; i++ )
2975     {
2976         const size_t i_ext = strlen(p_pattern[i].psz_match );
2977
2978         if( i_path < i_ext )
2979             continue;
2980         if( !strcmp( &psz_path[i_path-i_ext], p_pattern[i].psz_match ) )
2981         {
2982             InputGetExtraFilesPattern( p_input, pi_list, pppsz_list,
2983                                        psz_path,
2984                                        p_pattern[i].psz_match, p_pattern[i].psz_format,
2985                                        p_pattern[i].i_start, p_pattern[i].i_stop );
2986             return;
2987         }
2988     }
2989 }
2990
2991 /* */
2992 static void input_ChangeState( input_thread_t *p_input, int i_state )
2993 {
2994     const bool b_changed = p_input->p->i_state != i_state;
2995
2996     p_input->p->i_state = i_state;
2997     if( i_state == ERROR_S )
2998         p_input->b_error = true;
2999     else if( i_state == END_S )
3000         p_input->b_eof = true;
3001
3002     if( b_changed )
3003     {
3004         input_item_SetErrorWhenReading( p_input->p->p_item, p_input->b_error );
3005         input_SendEventState( p_input, i_state );
3006     }
3007 }
3008
3009
3010 /*****************************************************************************
3011  * MRLSplit: parse the access, demux and url part of the
3012  *           Media Resource Locator.
3013  *****************************************************************************/
3014 void input_SplitMRL( const char **ppsz_access, const char **ppsz_demux, char **ppsz_path,
3015                      char *psz_dup )
3016 {
3017     char *psz_access = NULL;
3018     char *psz_demux  = NULL;
3019     char *psz_path;
3020
3021     /* Either there is an access/demux specification before ://
3022      * or we have a plain local file path. */
3023     psz_path = strstr( psz_dup, "://" );
3024     if( psz_path != NULL )
3025     {
3026         *psz_path = '\0';
3027         psz_path += 3; /* skips "://" */
3028
3029         /* Separate access from demux (<access>/<demux>://<path>) */
3030         psz_access = psz_dup;
3031         psz_demux = strchr( psz_access, '/' );
3032         if( psz_demux )
3033             *psz_demux++ = '\0';
3034
3035         /* We really don't want module name substitution here! */
3036         if( psz_access[0] == '$' )
3037             psz_access++;
3038         if( psz_demux && psz_demux[0] == '$' )
3039             psz_demux++;
3040     }
3041     else
3042     {
3043         psz_path = psz_dup;
3044     }
3045     *ppsz_access = psz_access ? psz_access : (char*)"";
3046     *ppsz_demux = psz_demux ? psz_demux : (char*)"";
3047     *ppsz_path = psz_path;
3048 }
3049
3050 static inline bool next(char ** src)
3051 {
3052     char *end;
3053     errno = 0;
3054     long result = strtol( *src, &end, 0 );
3055     if( errno != 0 || result >= LONG_MAX || result <= LONG_MIN ||
3056         end == *src )
3057     {
3058         return false;
3059     }
3060     *src = end;
3061     return true;
3062 }
3063
3064 /*****************************************************************************
3065  * MRLSections: parse title and seekpoint info from the Media Resource Locator.
3066  *
3067  * Syntax:
3068  * [url][@[title-start][:chapter-start][-[title-end][:chapter-end]]]
3069  *****************************************************************************/
3070 static void MRLSections( input_thread_t *p_input, char *psz_source,
3071                          int *pi_title_start, int *pi_title_end,
3072                          int *pi_chapter_start, int *pi_chapter_end )
3073 {
3074     char *psz, *psz_end, *psz_next, *psz_check;
3075
3076     *pi_title_start = *pi_title_end = -1;
3077     *pi_chapter_start = *pi_chapter_end = -1;
3078
3079     /* Start by parsing titles and chapters */
3080     if( !psz_source || !( psz = strrchr( psz_source, '@' ) ) ) return;
3081
3082
3083     /* Check we are really dealing with a title/chapter section */
3084     psz_check = psz + 1;
3085     if( !*psz_check ) return;
3086     if( isdigit(*psz_check) )
3087         if(!next(&psz_check)) return;
3088     if( *psz_check != ':' && *psz_check != '-' && *psz_check ) return;
3089     if( *psz_check == ':' && ++psz_check )
3090     {
3091         if( isdigit(*psz_check) )
3092             if(!next(&psz_check)) return;
3093     }
3094     if( *psz_check != '-' && *psz_check ) return;
3095     if( *psz_check == '-' && ++psz_check )
3096     {
3097         if( isdigit(*psz_check) )
3098             if(!next(&psz_check)) return;
3099     }
3100     if( *psz_check != ':' && *psz_check ) return;
3101     if( *psz_check == ':' && ++psz_check )
3102     {
3103         if( isdigit(*psz_check) )
3104             if(!next(&psz_check)) return;
3105     }
3106     if( *psz_check ) return;
3107
3108     /* Separate start and end */
3109     *psz++ = 0;
3110     if( ( psz_end = strchr( psz, '-' ) ) ) *psz_end++ = 0;
3111
3112     /* Look for the start title */
3113     *pi_title_start = strtol( psz, &psz_next, 0 );
3114     if( !*pi_title_start && psz == psz_next ) *pi_title_start = -1;
3115     *pi_title_end = *pi_title_start;
3116     psz = psz_next;
3117
3118     /* Look for the start chapter */
3119     if( *psz ) psz++;
3120     *pi_chapter_start = strtol( psz, &psz_next, 0 );
3121     if( !*pi_chapter_start && psz == psz_next ) *pi_chapter_start = -1;
3122     *pi_chapter_end = *pi_chapter_start;
3123
3124     if( psz_end )
3125     {
3126         /* Look for the end title */
3127         *pi_title_end = strtol( psz_end, &psz_next, 0 );
3128         if( !*pi_title_end && psz_end == psz_next ) *pi_title_end = -1;
3129         psz_end = psz_next;
3130
3131         /* Look for the end chapter */
3132         if( *psz_end ) psz_end++;
3133         *pi_chapter_end = strtol( psz_end, &psz_next, 0 );
3134         if( !*pi_chapter_end && psz_end == psz_next ) *pi_chapter_end = -1;
3135     }
3136
3137     msg_Dbg( p_input, "source=`%s' title=%d/%d seekpoint=%d/%d",
3138              psz_source, *pi_title_start, *pi_chapter_start,
3139              *pi_title_end, *pi_chapter_end );
3140 }
3141
3142 /*****************************************************************************
3143  * input_AddSubtitles: add a subtitles file and enable it
3144  *****************************************************************************/
3145 static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced )
3146 {
3147     input_source_t *sub;
3148     vlc_value_t count;
3149     vlc_value_t list;
3150     char *psz_path, *psz_extension;
3151
3152     /* if we are provided a subtitle.sub file,
3153      * see if we don't have a subtitle.idx and use it instead */
3154     psz_path = strdup( psz_subtitle );
3155     if( psz_path )
3156     {
3157         psz_extension = strrchr( psz_path, '.');
3158         if( psz_extension && strcmp( psz_extension, ".sub" ) == 0 )
3159         {
3160             struct stat st;
3161
3162             strcpy( psz_extension, ".idx" );
3163
3164             if( !utf8_stat( psz_path, &st ) && S_ISREG( st.st_mode ) )
3165             {
3166                 msg_Dbg( p_input, "using %s subtitles file instead of %s",
3167                          psz_path, psz_subtitle );
3168                 strcpy( psz_subtitle, psz_path );
3169             }
3170         }
3171         free( psz_path );
3172     }
3173
3174     var_Change( p_input, "spu-es", VLC_VAR_CHOICESCOUNT, &count, NULL );
3175
3176     sub = InputSourceNew( p_input );
3177     if( !sub || InputSourceInit( p_input, sub, psz_subtitle, "subtitle" ) )
3178     {
3179         free( sub );
3180         return;
3181     }
3182     TAB_APPEND( p_input->p->i_slave, p_input->p->slave, sub );
3183
3184     /* Select the ES */
3185     if( b_forced && !var_Change( p_input, "spu-es", VLC_VAR_GETLIST, &list, NULL ) )
3186     {
3187         if( count.i_int == 0 )
3188             count.i_int++;
3189         /* if it was first one, there is disable too */
3190
3191         if( count.i_int < list.p_list->i_count )
3192         {
3193             const int i_id = list.p_list->p_values[count.i_int].i_int;
3194
3195             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_DEFAULT_BY_ID, i_id );
3196             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_BY_ID, i_id );
3197         }
3198         var_FreeList( &list, NULL );
3199     }
3200 }
3201
3202 /*****************************************************************************
3203  * Statistics
3204  *****************************************************************************/
3205 void input_UpdateStatistic( input_thread_t *p_input,
3206                             input_statistic_t i_type, int i_delta )
3207 {
3208     assert( p_input->p->i_state != INIT_S );
3209
3210     vlc_mutex_lock( &p_input->p->counters.counters_lock);
3211     switch( i_type )
3212     {
3213 #define I(c) stats_UpdateInteger( p_input, p_input->p->counters.c, i_delta, NULL )
3214     case INPUT_STATISTIC_DECODED_VIDEO:
3215         I(p_decoded_video);
3216         break;
3217     case INPUT_STATISTIC_DECODED_AUDIO:
3218         I(p_decoded_audio);
3219         break;
3220     case INPUT_STATISTIC_DECODED_SUBTITLE:
3221         I(p_decoded_sub);
3222         break;
3223     case INPUT_STATISTIC_SENT_PACKET:
3224         I(p_sout_sent_packets);
3225         break;
3226 #undef I
3227     case INPUT_STATISTIC_SENT_BYTE:
3228     {
3229         int i_bytes; /* That's pretty stupid to define it as an integer, it will overflow
3230                         really fast ... */
3231         if( !stats_UpdateInteger( p_input, p_input->p->counters.p_sout_sent_bytes, i_delta, &i_bytes ) )
3232             stats_UpdateFloat( p_input, p_input->p->counters.p_sout_send_bitrate, i_bytes, NULL );
3233         break;
3234     }
3235     default:
3236         msg_Err( p_input, "Invalid statistic type %d (internal error)", i_type );
3237         break;
3238     }
3239     vlc_mutex_unlock( &p_input->p->counters.counters_lock);
3240 }
3241
3242 /**/
3243 /* TODO FIXME nearly the same logic that snapshot code */
3244 char *input_CreateFilename( vlc_object_t *p_obj, const char *psz_path, const char *psz_prefix, const char *psz_extension )
3245 {
3246     char *psz_file;
3247     DIR *path;
3248
3249     path = utf8_opendir( psz_path );
3250     if( path )
3251     {
3252         closedir( path );
3253
3254         char *psz_tmp = str_format( p_obj, psz_prefix );
3255         if( !psz_tmp )
3256             return NULL;
3257
3258         char *psz_tmp2 = filename_sanitize( psz_tmp );
3259         free( psz_tmp );
3260
3261         if( !psz_tmp2 ||
3262             asprintf( &psz_file, "%s"DIR_SEP"%s%s%s",
3263                       psz_path, psz_tmp2,
3264                       psz_extension ? "." : "",
3265                       psz_extension ? psz_extension : "" ) < 0 )
3266             psz_file = NULL;
3267         free( psz_tmp2 );
3268         return psz_file;
3269     }
3270     else
3271     {
3272         psz_file = str_format( p_obj, psz_path );
3273         path_sanitize( psz_file );
3274         return psz_file;
3275     }
3276 }
3277