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     var_Create( p_input, "bit-rate", VLC_VAR_INTEGER );
1148     var_Create( p_input, "sample-rate", VLC_VAR_INTEGER );
1149
1150     /* */
1151     input_ChangeState( p_input, OPENING_S );
1152     input_SendEventCache( p_input, 0.0 );
1153
1154     /* */
1155     if( InputSourceInit( p_input, &p_input->p->input,
1156                          p_input->p->p_item->psz_uri, NULL ) )
1157     {
1158         goto error;
1159     }
1160
1161     InitTitle( p_input );
1162
1163     /* Load master infos */
1164     /* Init length */
1165     mtime_t i_length;
1166     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_LENGTH,
1167                          &i_length ) )
1168         i_length = 0;
1169     if( i_length <= 0 )
1170         i_length = input_item_GetDuration( p_input->p->p_item );
1171     input_SendEventLength( p_input, i_length );
1172
1173     input_SendEventPosition( p_input, 0.0, 0 );
1174
1175     if( !p_input->b_preparsing )
1176     {
1177         StartTitle( p_input );
1178         LoadSubtitles( p_input );
1179         LoadSlaves( p_input );
1180         InitPrograms( p_input );
1181     }
1182
1183     if( !p_input->b_preparsing && p_input->p->p_sout )
1184     {
1185         p_input->p->b_out_pace_control = (p_input->p->p_sout->i_out_pace_nocontrol > 0);
1186
1187         if( p_input->p->b_can_pace_control && p_input->p->b_out_pace_control )
1188         {
1189             /* We don't want a high input priority here or we'll
1190              * end-up sucking up all the CPU time */
1191             vlc_thread_set_priority( p_input, VLC_THREAD_PRIORITY_LOW );
1192         }
1193
1194         msg_Dbg( p_input, "starting in %s mode",
1195                  p_input->p->b_out_pace_control ? "async" : "sync" );
1196     }
1197
1198     p_meta = vlc_meta_New();
1199     if( p_meta )
1200     {
1201         /* Get meta data from users */
1202         InputMetaUser( p_input, p_meta );
1203
1204         /* Get meta data from master input */
1205         InputSourceMeta( p_input, &p_input->p->input, p_meta );
1206
1207         /* And from slave */
1208         for( int i = 0; i < p_input->p->i_slave; i++ )
1209             InputSourceMeta( p_input, p_input->p->slave[i], p_meta );
1210
1211         /* */
1212         InputUpdateMeta( p_input, p_meta );
1213     }
1214
1215     msg_Dbg( p_input, "`%s' successfully opened",
1216              p_input->p->p_item->psz_uri );
1217
1218     /* initialization is complete */
1219     input_ChangeState( p_input, PLAYING_S );
1220
1221     return VLC_SUCCESS;
1222
1223 error:
1224     input_ChangeState( p_input, ERROR_S );
1225
1226     if( p_input->p->p_es_out )
1227         es_out_Delete( p_input->p->p_es_out );
1228     if( p_input->p->p_es_out_display )
1229         es_out_Delete( p_input->p->p_es_out_display );
1230     if( p_input->p->p_resource )
1231     {
1232         if( p_input->p->p_sout )
1233             input_resource_RequestSout( p_input->p->p_resource,
1234                                          p_input->p->p_sout, NULL );
1235         input_resource_SetInput( p_input->p->p_resource, NULL );
1236     }
1237
1238 #ifdef ENABLE_SOUT
1239 error_stats:
1240 #endif
1241     if( !p_input->b_preparsing && libvlc_stats( p_input ) )
1242     {
1243 #define EXIT_COUNTER( c ) do { if( p_input->p->counters.p_##c ) \
1244                                    stats_CounterClean( p_input->p->counters.p_##c );\
1245                                p_input->p->counters.p_##c = NULL; } while(0)
1246         EXIT_COUNTER( read_bytes );
1247         EXIT_COUNTER( read_packets );
1248         EXIT_COUNTER( demux_read );
1249         EXIT_COUNTER( input_bitrate );
1250         EXIT_COUNTER( demux_bitrate );
1251         EXIT_COUNTER( demux_corrupted );
1252         EXIT_COUNTER( demux_discontinuity );
1253         EXIT_COUNTER( played_abuffers );
1254         EXIT_COUNTER( lost_abuffers );
1255         EXIT_COUNTER( displayed_pictures );
1256         EXIT_COUNTER( lost_pictures );
1257         EXIT_COUNTER( decoded_audio );
1258         EXIT_COUNTER( decoded_video );
1259         EXIT_COUNTER( decoded_sub );
1260
1261         if( p_input->p->p_sout )
1262         {
1263             EXIT_COUNTER( sout_sent_packets );
1264             EXIT_COUNTER( sout_sent_bytes );
1265             EXIT_COUNTER( sout_send_bitrate );
1266         }
1267 #undef EXIT_COUNTER
1268     }
1269
1270     /* Mark them deleted */
1271     p_input->p->input.p_demux = NULL;
1272     p_input->p->input.p_stream = NULL;
1273     p_input->p->input.p_access = NULL;
1274     p_input->p->p_es_out = NULL;
1275     p_input->p->p_es_out_display = NULL;
1276     p_input->p->p_sout = NULL;
1277
1278     return VLC_EGENERIC;
1279 }
1280
1281 /*****************************************************************************
1282  * End: end the input thread
1283  *****************************************************************************/
1284 static void End( input_thread_t * p_input )
1285 {
1286     int i;
1287
1288     /* We are at the end */
1289     input_ChangeState( p_input, END_S );
1290
1291     /* Clean control variables */
1292     input_ControlVarStop( p_input );
1293
1294     /* Stop es out activity */
1295     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_ACTIVE, false );
1296     es_out_Control( p_input->p->p_es_out, ES_OUT_SET_MODE, ES_OUT_MODE_NONE );
1297
1298     /* Clean up master */
1299     InputSourceClean( &p_input->p->input );
1300
1301     /* Delete slave */
1302     for( i = 0; i < p_input->p->i_slave; i++ )
1303     {
1304         InputSourceClean( p_input->p->slave[i] );
1305         free( p_input->p->slave[i] );
1306     }
1307     free( p_input->p->slave );
1308
1309     /* Unload all modules */
1310     if( p_input->p->p_es_out )
1311         es_out_Delete( p_input->p->p_es_out );
1312     if( p_input->p->p_es_out_display )
1313         es_out_Delete( p_input->p->p_es_out_display );
1314
1315     if( !p_input->b_preparsing )
1316     {
1317 #define CL_CO( c ) stats_CounterClean( p_input->p->counters.p_##c ); p_input->p->counters.p_##c = NULL;
1318         if( libvlc_stats( p_input ) )
1319         {
1320             /* make sure we are up to date */
1321             stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
1322             CL_CO( read_bytes );
1323             CL_CO( read_packets );
1324             CL_CO( demux_read );
1325             CL_CO( input_bitrate );
1326             CL_CO( demux_bitrate );
1327             CL_CO( demux_corrupted );
1328             CL_CO( demux_discontinuity );
1329             CL_CO( played_abuffers );
1330             CL_CO( lost_abuffers );
1331             CL_CO( displayed_pictures );
1332             CL_CO( lost_pictures );
1333             CL_CO( decoded_audio) ;
1334             CL_CO( decoded_video );
1335             CL_CO( decoded_sub) ;
1336         }
1337
1338         /* Close optional stream output instance */
1339         if( p_input->p->p_sout )
1340         {
1341             CL_CO( sout_sent_packets );
1342             CL_CO( sout_sent_bytes );
1343             CL_CO( sout_send_bitrate );
1344         }
1345 #undef CL_CO
1346     }
1347
1348     vlc_mutex_lock( &p_input->p->p_item->lock );
1349     if( p_input->p->i_attachment > 0 )
1350     {
1351         for( i = 0; i < p_input->p->i_attachment; i++ )
1352             vlc_input_attachment_Delete( p_input->p->attachment[i] );
1353         TAB_CLEAN( p_input->p->i_attachment, p_input->p->attachment );
1354     }
1355     vlc_mutex_unlock( &p_input->p->p_item->lock );
1356
1357     /* */
1358     input_resource_RequestSout( p_input->p->p_resource,
1359                                  p_input->p->p_sout, NULL );
1360     input_resource_SetInput( p_input->p->p_resource, NULL );
1361 }
1362
1363 /*****************************************************************************
1364  * Control
1365  *****************************************************************************/
1366 void input_ControlPush( input_thread_t *p_input,
1367                         int i_type, vlc_value_t *p_val )
1368 {
1369     vlc_mutex_lock( &p_input->p->lock_control );
1370     if( i_type == INPUT_CONTROL_SET_DIE )
1371     {
1372         /* Special case, empty the control */
1373         for( int i = 0; i < p_input->p->i_control; i++ )
1374         {
1375             input_control_t *p_ctrl = &p_input->p->control[i];
1376             ControlRelease( p_ctrl->i_type, p_ctrl->val );
1377         }
1378         p_input->p->i_control = 0;
1379     }
1380
1381     if( p_input->p->i_control >= INPUT_CONTROL_FIFO_SIZE )
1382     {
1383         msg_Err( p_input, "input control fifo overflow, trashing type=%d",
1384                  i_type );
1385         if( p_val )
1386             ControlRelease( i_type, *p_val );
1387     }
1388     else
1389     {
1390         input_control_t c;
1391         c.i_type = i_type;
1392         if( p_val )
1393             c.val = *p_val;
1394         else
1395             memset( &c.val, 0, sizeof(c.val) );
1396
1397         p_input->p->control[p_input->p->i_control++] = c;
1398     }
1399     vlc_cond_signal( &p_input->p->wait_control );
1400     vlc_mutex_unlock( &p_input->p->lock_control );
1401 }
1402
1403 static inline int ControlPop( input_thread_t *p_input,
1404                               int *pi_type, vlc_value_t *p_val,
1405                               mtime_t i_deadline )
1406 {
1407     input_thread_private_t *p_sys = p_input->p;
1408
1409     vlc_mutex_lock( &p_sys->lock_control );
1410     while( p_sys->i_control <= 0 )
1411     {
1412         if( !vlc_object_alive( p_input ) || i_deadline < 0 )
1413         {
1414             vlc_mutex_unlock( &p_sys->lock_control );
1415             return VLC_EGENERIC;
1416         }
1417
1418         if( vlc_cond_timedwait( &p_sys->wait_control, &p_sys->lock_control,
1419                                 i_deadline ) )
1420         {
1421             vlc_mutex_unlock( &p_sys->lock_control );
1422             return VLC_EGENERIC;
1423         }
1424     }
1425
1426     /* */
1427     *pi_type = p_sys->control[0].i_type;
1428     *p_val   = p_sys->control[0].val;
1429
1430     p_sys->i_control--;
1431     if( p_sys->i_control > 0 )
1432         memmove( &p_sys->control[0], &p_sys->control[1],
1433                  sizeof(*p_sys->control) * p_sys->i_control );
1434     vlc_mutex_unlock( &p_sys->lock_control );
1435
1436     return VLC_SUCCESS;
1437 }
1438
1439 static void ControlReduce( input_thread_t *p_input )
1440 {
1441     vlc_mutex_lock( &p_input->p->lock_control );
1442
1443     for( int i = 1; i < p_input->p->i_control; i++ )
1444     {
1445         const int i_lt = p_input->p->control[i-1].i_type;
1446         const int i_ct = p_input->p->control[i].i_type;
1447
1448         /* XXX We can't merge INPUT_CONTROL_SET_ES */
1449 /*        msg_Dbg( p_input, "[%d/%d] l=%d c=%d", i, p_input->p->i_control,
1450                  i_lt, i_ct );
1451 */
1452         if( i_lt == i_ct &&
1453             ( i_ct == INPUT_CONTROL_SET_STATE ||
1454               i_ct == INPUT_CONTROL_SET_RATE ||
1455               i_ct == INPUT_CONTROL_SET_POSITION ||
1456               i_ct == INPUT_CONTROL_SET_TIME ||
1457               i_ct == INPUT_CONTROL_SET_PROGRAM ||
1458               i_ct == INPUT_CONTROL_SET_TITLE ||
1459               i_ct == INPUT_CONTROL_SET_SEEKPOINT ||
1460               i_ct == INPUT_CONTROL_SET_BOOKMARK ) )
1461         {
1462             int j;
1463 //            msg_Dbg( p_input, "merged at %d", i );
1464             /* Remove the i-1 */
1465             for( j = i; j <  p_input->p->i_control; j++ )
1466                 p_input->p->control[j-1] = p_input->p->control[j];
1467             p_input->p->i_control--;
1468         }
1469         else
1470         {
1471             /* TODO but that's not that important
1472                 - merge SET_X with SET_X_CMD
1473                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before a SET_TITLE
1474                 - remove SET_SEEKPOINT/SET_POSITION/SET_TIME before another among them
1475                 - ?
1476                 */
1477         }
1478     }
1479     vlc_mutex_unlock( &p_input->p->lock_control );
1480 }
1481
1482 static void ControlRelease( int i_type, vlc_value_t val )
1483 {
1484     switch( i_type )
1485     {
1486     case INPUT_CONTROL_ADD_SUBTITLE:
1487     case INPUT_CONTROL_ADD_SLAVE:
1488         free( val.psz_string );
1489         break;
1490
1491     default:
1492         break;
1493     }
1494 }
1495
1496 /* Pause input */
1497 static void ControlPause( input_thread_t *p_input, mtime_t i_control_date )
1498 {
1499     int i_ret = VLC_SUCCESS;
1500     int i_state = PAUSE_S;
1501
1502     if( p_input->p->b_can_pause )
1503     {
1504         if( p_input->p->input.p_access )
1505             i_ret = access_Control( p_input->p->input.p_access,
1506                                      ACCESS_SET_PAUSE_STATE, true );
1507         else
1508             i_ret = demux_Control( p_input->p->input.p_demux,
1509                                     DEMUX_SET_PAUSE_STATE, true );
1510
1511         if( i_ret )
1512         {
1513             msg_Warn( p_input, "cannot set pause state" );
1514             return;
1515         }
1516     }
1517
1518     /* */
1519     i_ret = es_out_SetPauseState( p_input->p->p_es_out,
1520                                   p_input->p->b_can_pause, true,
1521                                   i_control_date );
1522     if( i_ret )
1523     {
1524         msg_Warn( p_input, "cannot set pause state at es_out level" );
1525         return;
1526     }
1527
1528     /* Switch to new state */
1529     input_ChangeState( p_input, i_state );
1530 }
1531
1532 static void ControlUnpause( input_thread_t *p_input, mtime_t i_control_date )
1533 {
1534     int i_ret = VLC_SUCCESS;
1535
1536     if( p_input->p->b_can_pause )
1537     {
1538         if( p_input->p->input.p_access )
1539             i_ret = access_Control( p_input->p->input.p_access,
1540                                      ACCESS_SET_PAUSE_STATE, false );
1541         else
1542             i_ret = demux_Control( p_input->p->input.p_demux,
1543                                     DEMUX_SET_PAUSE_STATE, false );
1544         if( i_ret )
1545         {
1546             /* FIXME What to do ? */
1547             msg_Warn( p_input, "cannot unset pause -> EOF" );
1548             input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
1549         }
1550     }
1551
1552     /* Switch to play */
1553     input_ChangeState( p_input, PLAYING_S );
1554
1555     /* */
1556     if( !i_ret )
1557         es_out_SetPauseState( p_input->p->p_es_out, false, false, i_control_date );
1558 }
1559
1560 static bool Control( input_thread_t *p_input,
1561                      int i_type, vlc_value_t val )
1562 {
1563     const mtime_t i_control_date = mdate();
1564     /* FIXME b_force_update is abused, it should be carefully checked */
1565     bool b_force_update = false;
1566
1567     if( !p_input )
1568         return b_force_update;
1569
1570     switch( i_type )
1571     {
1572         case INPUT_CONTROL_SET_DIE:
1573             msg_Dbg( p_input, "control: stopping input" );
1574
1575             /* Mark all submodules to die */
1576             ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
1577             break;
1578
1579         case INPUT_CONTROL_SET_POSITION:
1580         case INPUT_CONTROL_SET_POSITION_OFFSET:
1581         {
1582             double f_pos;
1583
1584             if( p_input->p->b_recording )
1585             {
1586                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) ignored while recording" );
1587                 break;
1588             }
1589             f_pos = val.f_float;
1590             if( i_type != INPUT_CONTROL_SET_POSITION )
1591                 f_pos += var_GetFloat( p_input, "position" );
1592             if( f_pos < 0.0 )
1593                 f_pos = 0.0;
1594             else if( f_pos > 1.0 )
1595                 f_pos = 1.0;
1596             /* Reset the decoders states and clock sync (before calling the demuxer */
1597             es_out_SetTime( p_input->p->p_es_out, -1 );
1598             if( demux_Control( p_input->p->input.p_demux, DEMUX_SET_POSITION,
1599                                 f_pos, !p_input->p->b_fast_seek ) )
1600             {
1601                 msg_Err( p_input, "INPUT_CONTROL_SET_POSITION(_OFFSET) "
1602                          "%2.1f%% failed", f_pos * 100 );
1603             }
1604             else
1605             {
1606                 if( p_input->p->i_slave > 0 )
1607                     SlaveSeek( p_input );
1608                 p_input->p->input.b_eof = false;
1609
1610                 b_force_update = true;
1611             }
1612             break;
1613         }
1614
1615         case INPUT_CONTROL_SET_TIME:
1616         case INPUT_CONTROL_SET_TIME_OFFSET:
1617         {
1618             int64_t i_time;
1619             int i_ret;
1620
1621             if( p_input->p->b_recording )
1622             {
1623                 msg_Err( p_input, "INPUT_CONTROL_SET_TIME(_OFFSET) ignored while recording" );
1624                 break;
1625             }
1626
1627             i_time = val.i_time;
1628             if( i_type != INPUT_CONTROL_SET_TIME )
1629                 i_time += var_GetTime( p_input, "time" );
1630
1631             if( i_time < 0 )
1632                 i_time = 0;
1633
1634             /* Reset the decoders states and clock sync (before calling the demuxer */
1635             es_out_SetTime( p_input->p->p_es_out, -1 );
1636
1637             i_ret = demux_Control( p_input->p->input.p_demux,
1638                                    DEMUX_SET_TIME, i_time,
1639                                    !p_input->p->b_fast_seek );
1640             if( i_ret )
1641             {
1642                 int64_t i_length;
1643
1644                 /* Emulate it with a SET_POS */
1645                 if( !demux_Control( p_input->p->input.p_demux,
1646                                     DEMUX_GET_LENGTH, &i_length ) && i_length > 0 )
1647                 {
1648                     double f_pos = (double)i_time / (double)i_length;
1649                     i_ret = demux_Control( p_input->p->input.p_demux,
1650                                             DEMUX_SET_POSITION, f_pos,
1651                                             !p_input->p->b_fast_seek );
1652                 }
1653             }
1654             if( i_ret )
1655             {
1656                 msg_Warn( p_input, "INPUT_CONTROL_SET_TIME(_OFFSET) %"PRId64
1657                          " failed or not possible", i_time );
1658             }
1659             else
1660             {
1661                 if( p_input->p->i_slave > 0 )
1662                     SlaveSeek( p_input );
1663                 p_input->p->input.b_eof = false;
1664
1665                 b_force_update = true;
1666             }
1667             break;
1668         }
1669
1670         case INPUT_CONTROL_SET_STATE:
1671             if( val.i_int != PLAYING_S && val.i_int != PAUSE_S )
1672                 msg_Err( p_input, "invalid state in INPUT_CONTROL_SET_STATE" );
1673             else if( p_input->p->i_state == PAUSE_S )
1674             {
1675                 ControlUnpause( p_input, i_control_date );
1676
1677                 b_force_update = true;
1678             }
1679             else if( val.i_int == PAUSE_S && p_input->p->i_state == PLAYING_S /* &&
1680                      p_input->p->b_can_pause */ )
1681             {
1682                 ControlPause( p_input, i_control_date );
1683
1684                 b_force_update = true;
1685             }
1686             else if( val.i_int == PAUSE_S && !p_input->p->b_can_pause && 0 )
1687             {
1688                 b_force_update = true;
1689
1690                 /* Correct "state" value */
1691                 input_ChangeState( p_input, p_input->p->i_state );
1692             }
1693             break;
1694
1695         case INPUT_CONTROL_SET_RATE:
1696         case INPUT_CONTROL_SET_RATE_SLOWER:
1697         case INPUT_CONTROL_SET_RATE_FASTER:
1698         {
1699             int i_rate;
1700             int i_rate_sign;
1701
1702             /* Get rate and direction */
1703             if( i_type == INPUT_CONTROL_SET_RATE )
1704             {
1705                 i_rate = abs( val.i_int );
1706                 i_rate_sign = val.i_int < 0 ? -1 : 1;
1707             }
1708             else
1709             {
1710                 static const int ppi_factor[][2] = {
1711                     {1,64}, {1,32}, {1,16}, {1,8}, {1,4}, {1,3}, {1,2}, {2,3},
1712                     {1,1},
1713                     {3,2}, {2,1}, {3,1}, {4,1}, {8,1}, {16,1}, {32,1}, {64,1},
1714                     {0,0}
1715                 };
1716                 int i_error;
1717                 int i_idx;
1718                 int i;
1719
1720                 i_rate_sign = p_input->p->i_rate < 0 ? -1 : 1;
1721
1722                 i_error = INT_MAX;
1723                 i_idx = -1;
1724                 for( i = 0; ppi_factor[i][0] != 0; i++ )
1725                 {
1726                     const int i_test_r = INPUT_RATE_DEFAULT * ppi_factor[i][0] / ppi_factor[i][1];
1727                     const int i_test_e = abs( abs( p_input->p->i_rate ) - i_test_r );
1728                     if( i_test_e < i_error )
1729                     {
1730                         i_idx = i;
1731                         i_error = i_test_e;
1732                     }
1733                 }
1734
1735                 assert( i_idx >= 0 && ppi_factor[i_idx][0] != 0 );
1736
1737                 if( i_type == INPUT_CONTROL_SET_RATE_SLOWER )
1738                 {
1739                     if( ppi_factor[i_idx+1][0] > 0 )
1740                         i_rate = INPUT_RATE_DEFAULT * ppi_factor[i_idx+1][0] / ppi_factor[i_idx+1][1];
1741                     else
1742                         i_rate = INPUT_RATE_MAX+1;
1743                 }
1744                 else
1745                 {
1746                     assert( i_type == INPUT_CONTROL_SET_RATE_FASTER );
1747                     if( i_idx > 0 )
1748                         i_rate = INPUT_RATE_DEFAULT * ppi_factor[i_idx-1][0] / ppi_factor[i_idx-1][1];
1749                     else
1750                         i_rate = INPUT_RATE_MIN-1;
1751                 }
1752             }
1753
1754             /* Check rate bound */
1755             if( i_rate < INPUT_RATE_MIN )
1756             {
1757                 msg_Dbg( p_input, "cannot set rate faster" );
1758                 i_rate = INPUT_RATE_MIN;
1759             }
1760             else if( i_rate > INPUT_RATE_MAX )
1761             {
1762                 msg_Dbg( p_input, "cannot set rate slower" );
1763                 i_rate = INPUT_RATE_MAX;
1764             }
1765
1766             /* Apply direction */
1767             if( i_rate_sign < 0 )
1768             {
1769                 if( p_input->p->input.b_rescale_ts )
1770                 {
1771                     msg_Dbg( p_input, "cannot set negative rate" );
1772                     i_rate = p_input->p->i_rate;
1773                     assert( i_rate > 0 );
1774                 }
1775                 else
1776                 {
1777                     i_rate *= i_rate_sign;
1778                 }
1779             }
1780
1781             if( i_rate != INPUT_RATE_DEFAULT &&
1782                 ( ( !p_input->p->b_can_rate_control && !p_input->p->input.b_rescale_ts ) ||
1783                   ( p_input->p->p_sout && !p_input->p->b_out_pace_control ) ) )
1784             {
1785                 msg_Dbg( p_input, "cannot change rate" );
1786                 i_rate = INPUT_RATE_DEFAULT;
1787             }
1788             if( i_rate != p_input->p->i_rate &&
1789                 !p_input->p->b_can_pace_control && p_input->p->b_can_rate_control )
1790             {
1791                 int i_ret;
1792                 if( p_input->p->input.p_access )
1793                 {
1794                     i_ret = VLC_EGENERIC;
1795                 }
1796                 else
1797                 {
1798                     if( !p_input->p->input.b_rescale_ts )
1799                         es_out_Control( p_input->p->p_es_out, ES_OUT_RESET_PCR );
1800
1801                     i_ret = demux_Control( p_input->p->input.p_demux,
1802                                             DEMUX_SET_RATE, &i_rate );
1803                 }
1804                 if( i_ret )
1805                 {
1806                     msg_Warn( p_input, "ACCESS/DEMUX_SET_RATE failed" );
1807                     i_rate = p_input->p->i_rate;
1808                 }
1809             }
1810
1811             /* */
1812             if( i_rate != p_input->p->i_rate )
1813             {
1814                 p_input->p->i_rate = i_rate;
1815                 input_SendEventRate( p_input, i_rate );
1816
1817                 if( p_input->p->input.b_rescale_ts )
1818                 {
1819                     const int i_rate_source = (p_input->p->b_can_pace_control || p_input->p->b_can_rate_control ) ? i_rate : INPUT_RATE_DEFAULT;
1820                     es_out_SetRate( p_input->p->p_es_out, i_rate_source, i_rate );
1821                 }
1822
1823                 b_force_update = true;
1824             }
1825             break;
1826         }
1827
1828         case INPUT_CONTROL_SET_PROGRAM:
1829             /* No need to force update, es_out does it if needed */
1830             es_out_Control( p_input->p->p_es_out,
1831                             ES_OUT_SET_GROUP, val.i_int );
1832
1833             demux_Control( p_input->p->input.p_demux, DEMUX_SET_GROUP, val.i_int,
1834                             NULL );
1835             break;
1836
1837         case INPUT_CONTROL_SET_ES:
1838             /* No need to force update, es_out does it if needed */
1839             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_BY_ID, val.i_int );
1840             break;
1841
1842         case INPUT_CONTROL_RESTART_ES:
1843             es_out_Control( p_input->p->p_es_out_display, ES_OUT_RESTART_ES_BY_ID, val.i_int );
1844             break;
1845
1846         case INPUT_CONTROL_SET_AUDIO_DELAY:
1847             if( !es_out_SetDelay( p_input->p->p_es_out_display, AUDIO_ES, val.i_time ) )
1848             {
1849                 input_SendEventAudioDelay( p_input, val.i_time );
1850                 UpdatePtsDelay( p_input );
1851             }
1852             break;
1853
1854         case INPUT_CONTROL_SET_SPU_DELAY:
1855             if( !es_out_SetDelay( p_input->p->p_es_out_display, SPU_ES, val.i_time ) )
1856             {
1857                 input_SendEventSubtitleDelay( p_input, val.i_time );
1858                 UpdatePtsDelay( p_input );
1859             }
1860             break;
1861
1862         case INPUT_CONTROL_SET_TITLE:
1863         case INPUT_CONTROL_SET_TITLE_NEXT:
1864         case INPUT_CONTROL_SET_TITLE_PREV:
1865             if( p_input->p->b_recording )
1866             {
1867                 msg_Err( p_input, "INPUT_CONTROL_SET_TITLE(*) ignored while recording" );
1868                 break;
1869             }
1870             if( p_input->p->input.b_title_demux &&
1871                 p_input->p->input.i_title > 0 )
1872             {
1873                 /* TODO */
1874                 /* FIXME handle demux title */
1875                 demux_t *p_demux = p_input->p->input.p_demux;
1876                 int i_title;
1877
1878                 if( i_type == INPUT_CONTROL_SET_TITLE_PREV )
1879                     i_title = p_demux->info.i_title - 1;
1880                 else if( i_type == INPUT_CONTROL_SET_TITLE_NEXT )
1881                     i_title = p_demux->info.i_title + 1;
1882                 else
1883                     i_title = val.i_int;
1884
1885                 if( i_title >= 0 && i_title < p_input->p->input.i_title )
1886                 {
1887                     es_out_SetTime( p_input->p->p_es_out, -1 );
1888
1889                     demux_Control( p_demux, DEMUX_SET_TITLE, i_title );
1890                     input_SendEventTitle( p_input, i_title );
1891                 }
1892             }
1893             else if( p_input->p->input.i_title > 0 )
1894             {
1895                 access_t *p_access = p_input->p->input.p_access;
1896                 int i_title;
1897
1898                 if( i_type == INPUT_CONTROL_SET_TITLE_PREV )
1899                     i_title = p_access->info.i_title - 1;
1900                 else if( i_type == INPUT_CONTROL_SET_TITLE_NEXT )
1901                     i_title = p_access->info.i_title + 1;
1902                 else
1903                     i_title = val.i_int;
1904
1905                 if( i_title >= 0 && i_title < p_input->p->input.i_title )
1906                 {
1907                     es_out_SetTime( p_input->p->p_es_out, -1 );
1908
1909                     stream_Control( p_input->p->input.p_stream, STREAM_CONTROL_ACCESS,
1910                                     ACCESS_SET_TITLE, i_title );
1911                     input_SendEventTitle( p_input, i_title );
1912                 }
1913             }
1914             break;
1915         case INPUT_CONTROL_SET_SEEKPOINT:
1916         case INPUT_CONTROL_SET_SEEKPOINT_NEXT:
1917         case INPUT_CONTROL_SET_SEEKPOINT_PREV:
1918             if( p_input->p->b_recording )
1919             {
1920                 msg_Err( p_input, "INPUT_CONTROL_SET_SEEKPOINT(*) ignored while recording" );
1921                 break;
1922             }
1923
1924             if( p_input->p->input.b_title_demux &&
1925                 p_input->p->input.i_title > 0 )
1926             {
1927                 demux_t *p_demux = p_input->p->input.p_demux;
1928                 int i_seekpoint;
1929                 int64_t i_input_time;
1930                 int64_t i_seekpoint_time;
1931
1932                 if( i_type == INPUT_CONTROL_SET_SEEKPOINT_PREV )
1933                 {
1934                     i_seekpoint = p_demux->info.i_seekpoint;
1935                     i_seekpoint_time = p_input->p->input.title[p_demux->info.i_title]->seekpoint[i_seekpoint]->i_time_offset;
1936                     i_input_time = var_GetTime( p_input, "time" );
1937                     if( i_seekpoint_time >= 0 && i_input_time >= 0 )
1938                     {
1939                         if( i_input_time < i_seekpoint_time + 3000000 )
1940                             i_seekpoint--;
1941                     }
1942                     else
1943                         i_seekpoint--;
1944                 }
1945                 else if( i_type == INPUT_CONTROL_SET_SEEKPOINT_NEXT )
1946                     i_seekpoint = p_demux->info.i_seekpoint + 1;
1947                 else
1948                     i_seekpoint = val.i_int;
1949
1950                 if( i_seekpoint >= 0 && i_seekpoint <
1951                     p_input->p->input.title[p_demux->info.i_title]->i_seekpoint )
1952                 {
1953
1954                     es_out_SetTime( p_input->p->p_es_out, -1 );
1955
1956                     demux_Control( p_demux, DEMUX_SET_SEEKPOINT, i_seekpoint );
1957                     input_SendEventSeekpoint( p_input, p_demux->info.i_title, i_seekpoint );
1958                 }
1959             }
1960             else if( p_input->p->input.i_title > 0 )
1961             {
1962                 access_t *p_access = p_input->p->input.p_access;
1963                 int i_seekpoint;
1964                 int64_t i_input_time;
1965                 int64_t i_seekpoint_time;
1966
1967                 if( i_type == INPUT_CONTROL_SET_SEEKPOINT_PREV )
1968                 {
1969                     i_seekpoint = p_access->info.i_seekpoint;
1970                     i_seekpoint_time = p_input->p->input.title[p_access->info.i_title]->seekpoint[i_seekpoint]->i_time_offset;
1971                     i_input_time = var_GetTime( p_input, "time" );
1972                     if( i_seekpoint_time >= 0 && i_input_time >= 0 )
1973                     {
1974                         if( i_input_time < i_seekpoint_time + 3000000 )
1975                             i_seekpoint--;
1976                     }
1977                     else
1978                         i_seekpoint--;
1979                 }
1980                 else if( i_type == INPUT_CONTROL_SET_SEEKPOINT_NEXT )
1981                     i_seekpoint = p_access->info.i_seekpoint + 1;
1982                 else
1983                     i_seekpoint = val.i_int;
1984
1985                 if( i_seekpoint >= 0 && i_seekpoint <
1986                     p_input->p->input.title[p_access->info.i_title]->i_seekpoint )
1987                 {
1988                     es_out_SetTime( p_input->p->p_es_out, -1 );
1989
1990                     stream_Control( p_input->p->input.p_stream, STREAM_CONTROL_ACCESS,
1991                                     ACCESS_SET_SEEKPOINT, i_seekpoint );
1992                     input_SendEventSeekpoint( p_input, p_access->info.i_title, i_seekpoint );
1993                 }
1994             }
1995             break;
1996
1997         case INPUT_CONTROL_ADD_SUBTITLE:
1998             if( val.psz_string )
1999                 SubtitleAdd( p_input, val.psz_string, true );
2000             break;
2001
2002         case INPUT_CONTROL_ADD_SLAVE:
2003             if( val.psz_string )
2004             {
2005                 input_source_t *slave = InputSourceNew( p_input );
2006
2007                 if( slave && !InputSourceInit( p_input, slave, val.psz_string, NULL ) )
2008                 {
2009                     vlc_meta_t *p_meta;
2010                     int64_t i_time;
2011
2012                     /* Add the slave */
2013                     msg_Dbg( p_input, "adding %s as slave on the fly",
2014                              val.psz_string );
2015
2016                     /* Set position */
2017                     if( demux_Control( p_input->p->input.p_demux,
2018                                         DEMUX_GET_TIME, &i_time ) )
2019                     {
2020                         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2021                         InputSourceClean( slave );
2022                         free( slave );
2023                         break;
2024                     }
2025                     if( demux_Control( slave->p_demux,
2026                                        DEMUX_SET_TIME, i_time, true ) )
2027                     {
2028                         msg_Err( p_input, "seek failed for new slave" );
2029                         InputSourceClean( slave );
2030                         free( slave );
2031                         break;
2032                     }
2033
2034                     /* Get meta (access and demux) */
2035                     p_meta = vlc_meta_New();
2036                     if( p_meta )
2037                     {
2038                         access_Control( slave->p_access, ACCESS_GET_META, p_meta );
2039                         demux_Control( slave->p_demux, DEMUX_GET_META, p_meta );
2040                         InputUpdateMeta( p_input, p_meta );
2041                     }
2042
2043                     TAB_APPEND( p_input->p->i_slave, p_input->p->slave, slave );
2044                 }
2045                 else
2046                 {
2047                     free( slave );
2048                     msg_Warn( p_input, "failed to add %s as slave",
2049                               val.psz_string );
2050                 }
2051             }
2052             break;
2053
2054         case INPUT_CONTROL_SET_RECORD_STATE:
2055             if( !!p_input->p->b_recording != !!val.b_bool )
2056             {
2057                 if( p_input->p->input.b_can_stream_record )
2058                 {
2059                     if( demux_Control( p_input->p->input.p_demux,
2060                                        DEMUX_SET_RECORD_STATE, val.b_bool ) )
2061                         val.b_bool = false;
2062                 }
2063                 else
2064                 {
2065                     if( es_out_SetRecordState( p_input->p->p_es_out_display, val.b_bool ) )
2066                         val.b_bool = false;
2067                 }
2068                 p_input->p->b_recording = val.b_bool;
2069
2070                 input_SendEventRecord( p_input, val.b_bool );
2071
2072                 b_force_update = true;
2073             }
2074             break;
2075
2076         case INPUT_CONTROL_SET_FRAME_NEXT:
2077             if( p_input->p->i_state == PAUSE_S )
2078             {
2079                 es_out_SetFrameNext( p_input->p->p_es_out );
2080             }
2081             else if( p_input->p->i_state == PLAYING_S )
2082             {
2083                 ControlPause( p_input, i_control_date );
2084             }
2085             else
2086             {
2087                 msg_Err( p_input, "invalid state for frame next" );
2088             }
2089             b_force_update = true;
2090             break;
2091
2092         case INPUT_CONTROL_SET_BOOKMARK:
2093         {
2094             seekpoint_t bookmark;
2095
2096             bookmark.i_time_offset = -1;
2097             bookmark.i_byte_offset = -1;
2098
2099             vlc_mutex_lock( &p_input->p->p_item->lock );
2100             if( val.i_int >= 0 && val.i_int < p_input->p->i_bookmark )
2101             {
2102                 const seekpoint_t *p_bookmark = p_input->p->pp_bookmark[val.i_int];
2103                 bookmark.i_time_offset = p_bookmark->i_time_offset;
2104                 bookmark.i_byte_offset = p_bookmark->i_byte_offset;
2105             }
2106             vlc_mutex_unlock( &p_input->p->p_item->lock );
2107
2108             if( bookmark.i_time_offset < 0 && bookmark.i_byte_offset < 0 )
2109             {
2110                 msg_Err( p_input, "invalid bookmark %d", val.i_int );
2111                 break;
2112             }
2113
2114             if( bookmark.i_time_offset >= 0 )
2115             {
2116                 val.i_time = bookmark.i_time_offset;
2117                 b_force_update = Control( p_input, INPUT_CONTROL_SET_TIME, val );
2118             }
2119             else if( bookmark.i_byte_offset >= 0 &&
2120                      p_input->p->input.p_stream )
2121             {
2122                 const int64_t i_size = stream_Size( p_input->p->input.p_stream );
2123                 if( i_size > 0 && bookmark.i_byte_offset <= i_size )
2124                 {
2125                     val.f_float = (double)bookmark.i_byte_offset / i_size;
2126                     b_force_update = Control( p_input, INPUT_CONTROL_SET_POSITION, val );
2127                 }
2128             }
2129             break;
2130         }
2131
2132         default:
2133             msg_Err( p_input, "not yet implemented" );
2134             break;
2135     }
2136
2137     ControlRelease( i_type, val );
2138     return b_force_update;
2139 }
2140
2141 /*****************************************************************************
2142  * UpdateTitleSeekpoint
2143  *****************************************************************************/
2144 static int UpdateTitleSeekpoint( input_thread_t *p_input,
2145                                  int i_title, int i_seekpoint )
2146 {
2147     int i_title_end = p_input->p->input.i_title_end -
2148                         p_input->p->input.i_title_offset;
2149     int i_seekpoint_end = p_input->p->input.i_seekpoint_end -
2150                             p_input->p->input.i_seekpoint_offset;
2151
2152     if( i_title_end >= 0 && i_seekpoint_end >= 0 )
2153     {
2154         if( i_title > i_title_end ||
2155             ( i_title == i_title_end && i_seekpoint > i_seekpoint_end ) )
2156             return 0;
2157     }
2158     else if( i_seekpoint_end >= 0 )
2159     {
2160         if( i_seekpoint > i_seekpoint_end )
2161             return 0;
2162     }
2163     else if( i_title_end >= 0 )
2164     {
2165         if( i_title > i_title_end )
2166             return 0;
2167     }
2168     return 1;
2169 }
2170 /*****************************************************************************
2171  * Update*FromDemux:
2172  *****************************************************************************/
2173 static int UpdateTitleSeekpointFromDemux( input_thread_t *p_input )
2174 {
2175     demux_t *p_demux = p_input->p->input.p_demux;
2176
2177     /* TODO event-like */
2178     if( p_demux->info.i_update & INPUT_UPDATE_TITLE )
2179     {
2180         input_SendEventTitle( p_input, p_demux->info.i_title );
2181
2182         p_demux->info.i_update &= ~INPUT_UPDATE_TITLE;
2183     }
2184     if( p_demux->info.i_update & INPUT_UPDATE_SEEKPOINT )
2185     {
2186         input_SendEventSeekpoint( p_input,
2187                                   p_demux->info.i_title, p_demux->info.i_seekpoint );
2188
2189         p_demux->info.i_update &= ~INPUT_UPDATE_SEEKPOINT;
2190     }
2191
2192     /* Hmmm only works with master input */
2193     if( p_input->p->input.p_demux == p_demux )
2194         return UpdateTitleSeekpoint( p_input,
2195                                      p_demux->info.i_title,
2196                                      p_demux->info.i_seekpoint );
2197     return 1;
2198 }
2199
2200 static void UpdateGenericFromDemux( input_thread_t *p_input )
2201 {
2202     demux_t *p_demux = p_input->p->input.p_demux;
2203
2204     if( p_demux->info.i_update & INPUT_UPDATE_META )
2205     {
2206         vlc_meta_t *p_meta = vlc_meta_New();
2207         if( p_meta )
2208         {
2209             demux_Control( p_input->p->input.p_demux, DEMUX_GET_META, p_meta );
2210             InputUpdateMeta( p_input, p_meta );
2211         }
2212         p_demux->info.i_update &= ~INPUT_UPDATE_META;
2213     }
2214
2215     p_demux->info.i_update &= ~INPUT_UPDATE_SIZE;
2216 }
2217
2218
2219 /*****************************************************************************
2220  * Update*FromAccess:
2221  *****************************************************************************/
2222 static int UpdateTitleSeekpointFromAccess( input_thread_t *p_input )
2223 {
2224     access_t *p_access = p_input->p->input.p_access;
2225
2226     if( p_access->info.i_update & INPUT_UPDATE_TITLE )
2227     {
2228         input_SendEventTitle( p_input, p_access->info.i_title );
2229
2230         stream_Control( p_input->p->input.p_stream, STREAM_UPDATE_SIZE );
2231
2232         p_access->info.i_update &= ~INPUT_UPDATE_TITLE;
2233     }
2234     if( p_access->info.i_update & INPUT_UPDATE_SEEKPOINT )
2235     {
2236         input_SendEventSeekpoint( p_input,
2237                                   p_access->info.i_title, p_access->info.i_seekpoint );
2238
2239         p_access->info.i_update &= ~INPUT_UPDATE_SEEKPOINT;
2240     }
2241     /* Hmmm only works with master input */
2242     if( p_input->p->input.p_access == p_access )
2243         return UpdateTitleSeekpoint( p_input,
2244                                      p_access->info.i_title,
2245                                      p_access->info.i_seekpoint );
2246     return 1;
2247 }
2248 static void UpdateGenericFromAccess( input_thread_t *p_input )
2249 {
2250     access_t *p_access = p_input->p->input.p_access;
2251
2252     if( p_access->info.i_update & INPUT_UPDATE_META )
2253     {
2254         /* TODO maybe multi - access ? */
2255         vlc_meta_t *p_meta = vlc_meta_New();
2256         if( p_meta )
2257         {
2258             access_Control( p_input->p->input.p_access, ACCESS_GET_META, p_meta );
2259             InputUpdateMeta( p_input, p_meta );
2260         }
2261         p_access->info.i_update &= ~INPUT_UPDATE_META;
2262     }
2263     if( p_access->info.i_update & INPUT_UPDATE_SIGNAL )
2264     {
2265         double f_quality;
2266         double f_strength;
2267
2268         if( access_Control( p_access, ACCESS_GET_SIGNAL, &f_quality, &f_strength ) )
2269             f_quality = f_strength = -1;
2270
2271         input_SendEventSignal( p_input, f_quality, f_strength );
2272
2273         p_access->info.i_update &= ~INPUT_UPDATE_SIGNAL;
2274     }
2275
2276     p_access->info.i_update &= ~INPUT_UPDATE_SIZE;
2277 }
2278
2279 /*****************************************************************************
2280  * InputSourceNew:
2281  *****************************************************************************/
2282 static input_source_t *InputSourceNew( input_thread_t *p_input )
2283 {
2284     VLC_UNUSED(p_input);
2285
2286     return calloc( 1,  sizeof( input_source_t ) );
2287 }
2288
2289 /*****************************************************************************
2290  * InputSourceInit:
2291  *****************************************************************************/
2292 static int InputSourceInit( input_thread_t *p_input,
2293                             input_source_t *in, const char *psz_mrl,
2294                             const char *psz_forced_demux )
2295 {
2296     const char *psz_access;
2297     const char *psz_demux;
2298     char *psz_path;
2299     char *psz_var_demux = NULL;
2300     double f_fps;
2301
2302     assert( psz_mrl );
2303     char *psz_dup = strdup( psz_mrl );
2304
2305     if( psz_dup == NULL )
2306         goto error;
2307
2308     /* Split uri */
2309     input_SplitMRL( &psz_access, &psz_demux, &psz_path, psz_dup );
2310
2311     /* FIXME: file:// handling plugins do not support URIs properly...
2312      * So we pre-decoded the URI to a path for them. Note that we do not do it
2313      * for non-standard VLC-specific schemes. */
2314     if( !strcmp( psz_access, "file" ) )
2315     {
2316         if( psz_path[0] != '/'
2317 #if (DIR_SEP_CHAR != '/')
2318             /* We accept invalid URIs too. */
2319             && psz_path[0] != DIR_SEP_CHAR
2320 #endif
2321           )
2322         {   /* host specified -> only localhost is supported */
2323             static const size_t i_localhost = sizeof("localhost")-1;
2324             if( strncmp( psz_path, "localhost/", i_localhost + 1) != 0 )
2325             {
2326                 msg_Err( p_input, "cannot open remote file `%s://%s'",
2327                          psz_access, psz_path );
2328                 msg_Info( p_input, "Did you mean `%s:///%s'?",
2329                           psz_access, psz_path );
2330                 goto error;
2331             }
2332             psz_path += i_localhost;
2333         }
2334         /* Remove HTML anchor if present (not supported). */
2335         char *p = strchr( psz_path, '#' );
2336         if( p )
2337             *p = '\0';
2338         /* Then URI-decode the path. */
2339         decode_URI( psz_path );
2340 #if defined( WIN32 ) && !defined( UNDER_CE )
2341         /* Strip leading slash in front of the drive letter */
2342         psz_path++;
2343 #endif
2344 #if (DIR_SEP_CHAR != '/')
2345         /* Turn slashes into anti-slashes */
2346         for( char *s = strchr( psz_path, '/' ); s; s = strchr( s + 1, '/' ) )
2347             *s = DIR_SEP_CHAR;
2348 #endif
2349     }
2350
2351     msg_Dbg( p_input, "`%s' gives access `%s' demux `%s' path `%s'",
2352              psz_mrl, psz_access, psz_demux, psz_path );
2353     if( !p_input->b_preparsing )
2354     {
2355         /* Hack to allow udp://@:port syntax */
2356         if( !psz_access ||
2357             (strncmp( psz_access, "udp", 3 ) &&
2358              strncmp( psz_access, "rtp", 3 )) )
2359         {
2360             /* Find optional titles and seekpoints */
2361             MRLSections( p_input, psz_path, &in->i_title_start, &in->i_title_end,
2362                      &in->i_seekpoint_start, &in->i_seekpoint_end );
2363         }
2364
2365         if( psz_forced_demux && *psz_forced_demux )
2366         {
2367             psz_demux = psz_forced_demux;
2368         }
2369         else if( *psz_demux == '\0' )
2370         {
2371             /* special hack for forcing a demuxer with --demux=module
2372              * (and do nothing with a list) */
2373             psz_var_demux = var_GetNonEmptyString( p_input, "demux" );
2374
2375             if( psz_var_demux != NULL &&
2376                 !strchr(psz_var_demux, ',' ) &&
2377                 !strchr(psz_var_demux, ':' ) )
2378             {
2379                 psz_demux = psz_var_demux;
2380
2381                 msg_Dbg( p_input, "enforced demux ` %s'", psz_demux );
2382             }
2383         }
2384
2385         /* Try access_demux first */
2386         in->p_demux = demux_New( p_input, p_input, psz_access, psz_demux, psz_path,
2387                                   NULL, p_input->p->p_es_out, false );
2388     }
2389     else
2390     {
2391         /* Preparsing is only for file:// */
2392         if( *psz_demux )
2393             goto error;
2394         if( !*psz_access ) /* path without scheme:// */
2395             psz_access = "file";
2396         if( strcmp( psz_access, "file" ) )
2397             goto error;
2398         msg_Dbg( p_input, "trying to pre-parse %s",  psz_path );
2399     }
2400
2401     if( in->p_demux )
2402     {
2403         /* Get infos from access_demux */
2404         int i_ret = demux_Control( in->p_demux,
2405                                    DEMUX_GET_PTS_DELAY, &in->i_pts_delay );
2406         assert( !i_ret );
2407         in->i_pts_delay = __MAX( 0, __MIN( in->i_pts_delay, INPUT_PTS_DELAY_MAX ) );
2408
2409
2410         in->b_title_demux = true;
2411         if( demux_Control( in->p_demux, DEMUX_GET_TITLE_INFO,
2412                             &in->title, &in->i_title,
2413                             &in->i_title_offset, &in->i_seekpoint_offset ) )
2414         {
2415             TAB_INIT( in->i_title, in->title );
2416         }
2417         if( demux_Control( in->p_demux, DEMUX_CAN_CONTROL_PACE,
2418                             &in->b_can_pace_control ) )
2419             in->b_can_pace_control = false;
2420
2421         assert( in->p_demux->pf_demux != NULL || !in->b_can_pace_control );
2422
2423         if( !in->b_can_pace_control )
2424         {
2425             if( demux_Control( in->p_demux, DEMUX_CAN_CONTROL_RATE,
2426                                 &in->b_can_rate_control, &in->b_rescale_ts ) )
2427             {
2428                 in->b_can_rate_control = false;
2429                 in->b_rescale_ts = true; /* not used */
2430             }
2431         }
2432         else
2433         {
2434             in->b_can_rate_control = true;
2435             in->b_rescale_ts = true;
2436         }
2437         if( demux_Control( in->p_demux, DEMUX_CAN_PAUSE,
2438                             &in->b_can_pause ) )
2439             in->b_can_pause = false;
2440         var_SetBool( p_input, "can-pause", in->b_can_pause || !in->b_can_pace_control ); /* XXX temporary because of es_out_timeshift*/
2441         var_SetBool( p_input, "can-rate", !in->b_can_pace_control || in->b_can_rate_control ); /* XXX temporary because of es_out_timeshift*/
2442         var_SetBool( p_input, "can-rewind", !in->b_rescale_ts && !in->b_can_pace_control && in->b_can_rate_control );
2443
2444         bool b_can_seek;
2445         if( demux_Control( in->p_demux, DEMUX_CAN_SEEK, &b_can_seek ) )
2446             b_can_seek = false;
2447         var_SetBool( p_input, "can-seek", b_can_seek );
2448     }
2449     else
2450     {
2451         /* Now try a real access */
2452         in->p_access = access_New( p_input, p_input, psz_access, psz_demux, psz_path );
2453         if( in->p_access == NULL )
2454         {
2455             if( vlc_object_alive( p_input ) )
2456             {
2457                 msg_Err( p_input, "open of `%s' failed: %s", psz_mrl,
2458                                                              msg_StackMsg() );
2459                 dialog_Fatal( p_input, _("Your input can't be opened"),
2460                               _("VLC is unable to open the MRL '%s'."
2461                                 " Check the log for details."), psz_mrl );
2462             }
2463             goto error;
2464         }
2465
2466         /* Get infos from access */
2467         if( !p_input->b_preparsing )
2468         {
2469             bool b_can_seek;
2470             access_Control( in->p_access,
2471                              ACCESS_GET_PTS_DELAY, &in->i_pts_delay );
2472             in->i_pts_delay = __MAX( 0, __MIN( in->i_pts_delay, INPUT_PTS_DELAY_MAX ) );
2473
2474             in->b_title_demux = false;
2475             if( access_Control( in->p_access, ACCESS_GET_TITLE_INFO,
2476                                  &in->title, &in->i_title,
2477                                 &in->i_title_offset, &in->i_seekpoint_offset ) )
2478
2479             {
2480                 TAB_INIT( in->i_title, in->title );
2481             }
2482             access_Control( in->p_access, ACCESS_CAN_CONTROL_PACE,
2483                              &in->b_can_pace_control );
2484             in->b_can_rate_control = in->b_can_pace_control;
2485             in->b_rescale_ts = true;
2486
2487             access_Control( in->p_access, ACCESS_CAN_PAUSE, &in->b_can_pause );
2488             var_SetBool( p_input, "can-pause", in->b_can_pause || !in->b_can_pace_control ); /* XXX temporary because of es_out_timeshift*/
2489             var_SetBool( p_input, "can-rate", !in->b_can_pace_control || in->b_can_rate_control ); /* XXX temporary because of es_out_timeshift*/
2490             var_SetBool( p_input, "can-rewind", !in->b_rescale_ts && !in->b_can_pace_control );
2491
2492             access_Control( in->p_access, ACCESS_CAN_SEEK, &b_can_seek );
2493             var_SetBool( p_input, "can-seek", b_can_seek );
2494         }
2495
2496         /* */
2497         int  i_input_list;
2498         char **ppsz_input_list;
2499
2500         TAB_INIT( i_input_list, ppsz_input_list );
2501
2502         /* On master stream only, use input-list */
2503         if( &p_input->p->input == in )
2504         {
2505             char *psz_list;
2506             char *psz_parser;
2507
2508             psz_list =
2509             psz_parser = var_CreateGetNonEmptyString( p_input, "input-list" );
2510
2511             while( psz_parser && *psz_parser )
2512             {
2513                 char *p = strchr( psz_parser, ',' );
2514                 if( p )
2515                     *p++ = '\0';
2516
2517                 if( *psz_parser )
2518                 {
2519                     char *psz_name = strdup( psz_parser );
2520                     if( psz_name )
2521                         TAB_APPEND( i_input_list, ppsz_input_list, psz_name );
2522                 }
2523
2524                 psz_parser = p;
2525             }
2526             free( psz_list );
2527         }
2528         /* Autodetect extra files if none specified */
2529         if( i_input_list <= 0 )
2530         {
2531             InputGetExtraFiles( p_input, &i_input_list, &ppsz_input_list,
2532                                 psz_access, psz_path );
2533         }
2534         if( i_input_list > 0 )
2535             TAB_APPEND( i_input_list, ppsz_input_list, NULL );
2536
2537         /* Create the stream_t */
2538         in->p_stream = stream_AccessNew( in->p_access, ppsz_input_list );
2539         if( ppsz_input_list )
2540         {
2541             for( int i = 0; ppsz_input_list[i] != NULL; i++ )
2542                 free( ppsz_input_list[i] );
2543             TAB_CLEAN( i_input_list, ppsz_input_list );
2544         }
2545
2546         if( in->p_stream == NULL )
2547         {
2548             msg_Warn( p_input, "cannot create a stream_t from access" );
2549             goto error;
2550         }
2551
2552         /* Add stream filters */
2553         char *psz_stream_filter = var_GetNonEmptyString( p_input,
2554                                                          "stream-filter" );
2555         in->p_stream = stream_FilterChainNew( in->p_stream,
2556                                               psz_stream_filter,
2557                                               var_GetBool( p_input, "input-record-native" ) );
2558         free( psz_stream_filter );
2559
2560         /* Open a demuxer */
2561         if( *psz_demux == '\0' && *in->p_access->psz_demux )
2562         {
2563             psz_demux = in->p_access->psz_demux;
2564         }
2565
2566         {
2567             /* Take access/stream redirections into account */
2568             char *psz_real_path;
2569             char *psz_buf = NULL;
2570             if( in->p_stream->psz_path )
2571             {
2572                 const char *psz_a, *psz_d;
2573                 psz_buf = strdup( in->p_stream->psz_path );
2574                 input_SplitMRL( &psz_a, &psz_d, &psz_real_path, psz_buf );
2575             }
2576             else
2577             {
2578                 psz_real_path = psz_path;
2579             }
2580             in->p_demux = demux_New( p_input, p_input, psz_access, psz_demux,
2581                                       psz_real_path,
2582                                       in->p_stream, p_input->p->p_es_out,
2583                                       p_input->b_preparsing );
2584             free( psz_buf );
2585         }
2586
2587         if( in->p_demux == NULL )
2588         {
2589             if( vlc_object_alive( p_input ) )
2590             {
2591                 msg_Err( p_input, "no suitable demux module for `%s/%s://%s'",
2592                          psz_access, psz_demux, psz_path );
2593                 dialog_Fatal( VLC_OBJECT( p_input ),
2594                               _("VLC can't recognize the input's format"),
2595                               _("The format of '%s' cannot be detected. "
2596                                 "Have a look at the log for details."), psz_mrl );
2597             }
2598             goto error;
2599         }
2600         assert( in->p_demux->pf_demux != NULL );
2601
2602         /* Get title from demux */
2603         if( !p_input->b_preparsing && in->i_title <= 0 )
2604         {
2605             if( demux_Control( in->p_demux, DEMUX_GET_TITLE_INFO,
2606                                 &in->title, &in->i_title,
2607                                 &in->i_title_offset, &in->i_seekpoint_offset ))
2608             {
2609                 TAB_INIT( in->i_title, in->title );
2610             }
2611             else
2612             {
2613                 in->b_title_demux = true;
2614             }
2615         }
2616     }
2617
2618     free( psz_var_demux );
2619     free( psz_dup );
2620
2621     /* Set record capabilities */
2622     if( demux_Control( in->p_demux, DEMUX_CAN_RECORD, &in->b_can_stream_record ) )
2623         in->b_can_stream_record = false;
2624 #ifdef ENABLE_SOUT
2625     if( !var_GetBool( p_input, "input-record-native" ) )
2626         in->b_can_stream_record = false;
2627     var_SetBool( p_input, "can-record", true );
2628 #else
2629     var_SetBool( p_input, "can-record", in->b_can_stream_record );
2630 #endif
2631
2632     /* get attachment
2633      * FIXME improve for b_preparsing: move it after GET_META and check psz_arturl */
2634     if( 1 || !p_input->b_preparsing )
2635     {
2636         int i_attachment;
2637         input_attachment_t **attachment;
2638         if( !demux_Control( in->p_demux, DEMUX_GET_ATTACHMENTS,
2639                              &attachment, &i_attachment ) )
2640         {
2641             vlc_mutex_lock( &p_input->p->p_item->lock );
2642             AppendAttachment( &p_input->p->i_attachment, &p_input->p->attachment,
2643                               i_attachment, attachment );
2644             vlc_mutex_unlock( &p_input->p->p_item->lock );
2645         }
2646     }
2647     if( !demux_Control( in->p_demux, DEMUX_GET_FPS, &f_fps ) && f_fps > 0.0 )
2648     {
2649         vlc_mutex_lock( &p_input->p->p_item->lock );
2650         p_input->p->f_fps = f_fps;
2651         vlc_mutex_unlock( &p_input->p->p_item->lock );
2652     }
2653
2654     if( var_GetInteger( p_input, "clock-synchro" ) != -1 )
2655         in->b_can_pace_control = !var_GetInteger( p_input, "clock-synchro" );
2656
2657     return VLC_SUCCESS;
2658
2659 error:
2660     if( in->p_demux )
2661         demux_Delete( in->p_demux );
2662
2663     if( in->p_stream )
2664         stream_Delete( in->p_stream );
2665
2666     if( in->p_access )
2667         access_Delete( in->p_access );
2668
2669     free( psz_var_demux );
2670     free( psz_dup );
2671
2672     return VLC_EGENERIC;
2673 }
2674
2675 /*****************************************************************************
2676  * InputSourceClean:
2677  *****************************************************************************/
2678 static void InputSourceClean( input_source_t *in )
2679 {
2680     int i;
2681
2682     if( in->p_demux )
2683         demux_Delete( in->p_demux );
2684
2685     if( in->p_stream )
2686         stream_Delete( in->p_stream );
2687
2688     if( in->p_access )
2689         access_Delete( in->p_access );
2690
2691     if( in->i_title > 0 )
2692     {
2693         for( i = 0; i < in->i_title; i++ )
2694             vlc_input_title_Delete( in->title[i] );
2695         TAB_CLEAN( in->i_title, in->title );
2696     }
2697 }
2698
2699 /*****************************************************************************
2700  * InputSourceMeta:
2701  *****************************************************************************/
2702 static void InputSourceMeta( input_thread_t *p_input,
2703                              input_source_t *p_source, vlc_meta_t *p_meta )
2704 {
2705     access_t *p_access = p_source->p_access;
2706     demux_t *p_demux = p_source->p_demux;
2707
2708     /* XXX Remember that checking against p_item->p_meta->i_status & ITEM_PREPARSED
2709      * is a bad idea */
2710
2711     /* Read access meta */
2712     if( p_access )
2713         access_Control( p_access, ACCESS_GET_META, p_meta );
2714
2715     /* Read demux meta */
2716     demux_Control( p_demux, DEMUX_GET_META, p_meta );
2717
2718     /* If the demux report unsupported meta data, try an external "meta reader" */
2719     bool b_bool;
2720     if( demux_Control( p_demux, DEMUX_HAS_UNSUPPORTED_META, &b_bool ) )
2721         return;
2722     if( !b_bool )
2723         return;
2724
2725     demux_meta_t *p_demux_meta =
2726         vlc_custom_create( p_demux, sizeof( *p_demux_meta ),
2727                            VLC_OBJECT_GENERIC, "demux meta" );
2728     if( !p_demux_meta )
2729         return;
2730     p_demux_meta->p_demux = p_demux;
2731
2732     module_t *p_id3 = module_need( p_demux_meta, "meta reader", NULL, false );
2733     if( p_id3 )
2734     {
2735         if( p_demux_meta->p_meta )
2736         {
2737             vlc_meta_Merge( p_meta, p_demux_meta->p_meta );
2738             vlc_meta_Delete( p_demux_meta->p_meta );
2739         }
2740
2741         if( p_demux_meta->i_attachments > 0 )
2742         {
2743             vlc_mutex_lock( &p_input->p->p_item->lock );
2744             AppendAttachment( &p_input->p->i_attachment, &p_input->p->attachment,
2745                               p_demux_meta->i_attachments, p_demux_meta->attachments );
2746             vlc_mutex_unlock( &p_input->p->p_item->lock );
2747         }
2748         module_unneed( p_demux, p_id3 );
2749     }
2750     vlc_object_release( p_demux_meta );
2751 }
2752
2753
2754 static void SlaveDemux( input_thread_t *p_input, bool *pb_demux_polled )
2755 {
2756     int64_t i_time;
2757     int i;
2758
2759     *pb_demux_polled = false;
2760     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_TIME, &i_time ) )
2761     {
2762         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2763         return;
2764     }
2765
2766     for( i = 0; i < p_input->p->i_slave; i++ )
2767     {
2768         input_source_t *in = p_input->p->slave[i];
2769         int i_ret;
2770
2771         if( in->b_eof )
2772             continue;
2773
2774         const bool b_demux_polled = in->p_demux->pf_demux != NULL;
2775         if( !b_demux_polled )
2776             continue;
2777
2778         *pb_demux_polled = true;
2779
2780         /* Call demux_Demux until we have read enough data */
2781         if( demux_Control( in->p_demux, DEMUX_SET_NEXT_DEMUX_TIME, i_time ) )
2782         {
2783             for( ;; )
2784             {
2785                 int64_t i_stime;
2786                 if( demux_Control( in->p_demux, DEMUX_GET_TIME, &i_stime ) )
2787                 {
2788                     msg_Err( p_input, "slave[%d] doesn't like "
2789                              "DEMUX_GET_TIME -> EOF", i );
2790                     i_ret = 0;
2791                     break;
2792                 }
2793
2794                 if( i_stime >= i_time )
2795                 {
2796                     i_ret = 1;
2797                     break;
2798                 }
2799
2800                 if( ( i_ret = demux_Demux( in->p_demux ) ) <= 0 )
2801                     break;
2802             }
2803         }
2804         else
2805         {
2806             i_ret = demux_Demux( in->p_demux );
2807         }
2808
2809         if( i_ret <= 0 )
2810         {
2811             msg_Dbg( p_input, "slave %d EOF", i );
2812             in->b_eof = true;
2813         }
2814     }
2815 }
2816
2817 static void SlaveSeek( input_thread_t *p_input )
2818 {
2819     int64_t i_time;
2820     int i;
2821
2822     if( demux_Control( p_input->p->input.p_demux, DEMUX_GET_TIME, &i_time ) )
2823     {
2824         msg_Err( p_input, "demux doesn't like DEMUX_GET_TIME" );
2825         return;
2826     }
2827
2828     for( i = 0; i < p_input->p->i_slave; i++ )
2829     {
2830         input_source_t *in = p_input->p->slave[i];
2831
2832         if( demux_Control( in->p_demux, DEMUX_SET_TIME, i_time, true ) )
2833         {
2834             if( !in->b_eof )
2835                 msg_Err( p_input, "seek failed for slave %d -> EOF", i );
2836             in->b_eof = true;
2837         }
2838         else
2839         {
2840             in->b_eof = false;
2841         }
2842     }
2843 }
2844
2845 /*****************************************************************************
2846  * InputMetaUser:
2847  *****************************************************************************/
2848 static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta )
2849 {
2850     static const struct { int i_meta; const char *psz_name; } p_list[] = {
2851         { vlc_meta_Title,       "meta-title" },
2852         { vlc_meta_Artist,      "meta-artist" },
2853         { vlc_meta_Genre,       "meta-genre" },
2854         { vlc_meta_Copyright,   "meta-copyright" },
2855         { vlc_meta_Description, "meta-description" },
2856         { vlc_meta_Date,        "meta-date" },
2857         { vlc_meta_URL,         "meta-url" },
2858         { 0, NULL }
2859     };
2860
2861     /* Get meta information from user */
2862     for( int i = 0; p_list[i].psz_name; i++ )
2863     {
2864         char *psz_string = var_GetNonEmptyString( p_input, p_list[i].psz_name );
2865         if( !psz_string )
2866             continue;
2867
2868         EnsureUTF8( psz_string );
2869         vlc_meta_Set( p_meta, p_list[i].i_meta, psz_string );
2870         free( psz_string );
2871     }
2872 }
2873
2874 /*****************************************************************************
2875  * InputUpdateMeta: merge p_item meta data with p_meta taking care of
2876  * arturl and locking issue.
2877  *****************************************************************************/
2878 static void InputUpdateMeta( input_thread_t *p_input, vlc_meta_t *p_meta )
2879 {
2880     es_out_ControlSetMeta( p_input->p->p_es_out, p_meta );
2881     vlc_meta_Delete( p_meta );
2882 }
2883
2884 static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
2885                               int i_new, input_attachment_t **pp_new )
2886 {
2887     int i_attachment = *pi_attachment;
2888     input_attachment_t **attachment = *ppp_attachment;
2889     int i;
2890
2891     attachment = realloc( attachment,
2892                           sizeof(input_attachment_t**) * ( i_attachment + i_new ) );
2893     for( i = 0; i < i_new; i++ )
2894         attachment[i_attachment++] = pp_new[i];
2895     free( pp_new );
2896
2897     /* */
2898     *pi_attachment = i_attachment;
2899     *ppp_attachment = attachment;
2900 }
2901 /*****************************************************************************
2902  * InputGetExtraFiles
2903  *  Autodetect extra input list
2904  *****************************************************************************/
2905 static void InputGetExtraFilesPattern( input_thread_t *p_input,
2906                                        int *pi_list, char ***pppsz_list,
2907                                        const char *psz_path,
2908                                        const char *psz_match,
2909                                        const char *psz_format,
2910                                        int i_start, int i_stop )
2911 {
2912     int i_list;
2913     char **ppsz_list;
2914
2915     TAB_INIT( i_list, ppsz_list );
2916
2917     char *psz_base = strdup( psz_path );
2918     if( !psz_base )
2919         goto exit;
2920
2921     /* Remove the extension */
2922     char *psz_end = &psz_base[strlen(psz_base)-strlen(psz_match)];
2923     assert( psz_end >= psz_base);
2924     *psz_end = '\0';
2925
2926     /* Try to list files */
2927     for( int i = i_start; i <= i_stop; i++ )
2928     {
2929         struct stat st;
2930         char *psz_file;
2931
2932         if( asprintf( &psz_file, psz_format, psz_base, i ) < 0 )
2933             break;
2934
2935         if( utf8_stat( psz_file, &st ) || !S_ISREG( st.st_mode ) || !st.st_size )
2936         {
2937             free( psz_file );
2938             break;
2939         }
2940
2941         msg_Dbg( p_input, "Detected extra file `%s'", psz_file );
2942         TAB_APPEND( i_list, ppsz_list, psz_file );
2943     }
2944     free( psz_base );
2945 exit:
2946     *pi_list = i_list;
2947     *pppsz_list = ppsz_list;
2948 }
2949
2950 static void InputGetExtraFiles( input_thread_t *p_input,
2951                                 int *pi_list, char ***pppsz_list,
2952                                 const char *psz_access, const char *psz_path )
2953 {
2954     static const struct
2955     {
2956         const char *psz_match;
2957         const char *psz_format;
2958         int i_start;
2959         int i_stop;
2960     } p_pattern[] = {
2961         /* XXX the order is important */
2962         { ".001",         "%s.%.3d",        2, 999 },
2963         { ".part1.rar",   "%s.part%.1d.rar",2, 9 },
2964         { ".part01.rar",  "%s.part%.2d.rar",2, 99, },
2965         { ".part001.rar", "%s.part%.3d.rar",2, 999 },
2966         { ".rar",         "%s.r%.2d",       0, 99 },
2967         { NULL, NULL, 0, 0 }
2968     };
2969
2970     TAB_INIT( *pi_list, *pppsz_list );
2971
2972     if( ( psz_access && *psz_access && strcmp( psz_access, "file" ) ) || !psz_path )
2973         return;
2974
2975     const size_t i_path = strlen(psz_path);
2976
2977     for( int i = 0; p_pattern[i].psz_match != NULL; i++ )
2978     {
2979         const size_t i_ext = strlen(p_pattern[i].psz_match );
2980
2981         if( i_path < i_ext )
2982             continue;
2983         if( !strcmp( &psz_path[i_path-i_ext], p_pattern[i].psz_match ) )
2984         {
2985             InputGetExtraFilesPattern( p_input, pi_list, pppsz_list,
2986                                        psz_path,
2987                                        p_pattern[i].psz_match, p_pattern[i].psz_format,
2988                                        p_pattern[i].i_start, p_pattern[i].i_stop );
2989             return;
2990         }
2991     }
2992 }
2993
2994 /* */
2995 static void input_ChangeState( input_thread_t *p_input, int i_state )
2996 {
2997     const bool b_changed = p_input->p->i_state != i_state;
2998
2999     p_input->p->i_state = i_state;
3000     if( i_state == ERROR_S )
3001         p_input->b_error = true;
3002     else if( i_state == END_S )
3003         p_input->b_eof = true;
3004
3005     if( b_changed )
3006     {
3007         input_item_SetErrorWhenReading( p_input->p->p_item, p_input->b_error );
3008         input_SendEventState( p_input, i_state );
3009     }
3010 }
3011
3012
3013 /*****************************************************************************
3014  * MRLSplit: parse the access, demux and url part of the
3015  *           Media Resource Locator.
3016  *****************************************************************************/
3017 void input_SplitMRL( const char **ppsz_access, const char **ppsz_demux, char **ppsz_path,
3018                      char *psz_dup )
3019 {
3020     char *psz_access = NULL;
3021     char *psz_demux  = NULL;
3022     char *psz_path;
3023
3024     /* Either there is an access/demux specification before ://
3025      * or we have a plain local file path. */
3026     psz_path = strstr( psz_dup, "://" );
3027     if( psz_path != NULL )
3028     {
3029         *psz_path = '\0';
3030         psz_path += 3; /* skips "://" */
3031
3032         /* Separate access from demux (<access>/<demux>://<path>) */
3033         psz_access = psz_dup;
3034         psz_demux = strchr( psz_access, '/' );
3035         if( psz_demux )
3036             *psz_demux++ = '\0';
3037
3038         /* We really don't want module name substitution here! */
3039         if( psz_access[0] == '$' )
3040             psz_access++;
3041         if( psz_demux && psz_demux[0] == '$' )
3042             psz_demux++;
3043     }
3044     else
3045     {
3046         psz_path = psz_dup;
3047     }
3048     *ppsz_access = psz_access ? psz_access : (char*)"";
3049     *ppsz_demux = psz_demux ? psz_demux : (char*)"";
3050     *ppsz_path = psz_path;
3051 }
3052
3053 static inline bool next(char ** src)
3054 {
3055     char *end;
3056     errno = 0;
3057     long result = strtol( *src, &end, 0 );
3058     if( errno != 0 || result >= LONG_MAX || result <= LONG_MIN ||
3059         end == *src )
3060     {
3061         return false;
3062     }
3063     *src = end;
3064     return true;
3065 }
3066
3067 /*****************************************************************************
3068  * MRLSections: parse title and seekpoint info from the Media Resource Locator.
3069  *
3070  * Syntax:
3071  * [url][@[title-start][:chapter-start][-[title-end][:chapter-end]]]
3072  *****************************************************************************/
3073 static void MRLSections( input_thread_t *p_input, char *psz_source,
3074                          int *pi_title_start, int *pi_title_end,
3075                          int *pi_chapter_start, int *pi_chapter_end )
3076 {
3077     char *psz, *psz_end, *psz_next, *psz_check;
3078
3079     *pi_title_start = *pi_title_end = -1;
3080     *pi_chapter_start = *pi_chapter_end = -1;
3081
3082     /* Start by parsing titles and chapters */
3083     if( !psz_source || !( psz = strrchr( psz_source, '@' ) ) ) return;
3084
3085
3086     /* Check we are really dealing with a title/chapter section */
3087     psz_check = psz + 1;
3088     if( !*psz_check ) return;
3089     if( isdigit(*psz_check) )
3090         if(!next(&psz_check)) return;
3091     if( *psz_check != ':' && *psz_check != '-' && *psz_check ) return;
3092     if( *psz_check == ':' && ++psz_check )
3093     {
3094         if( isdigit(*psz_check) )
3095             if(!next(&psz_check)) return;
3096     }
3097     if( *psz_check != '-' && *psz_check ) return;
3098     if( *psz_check == '-' && ++psz_check )
3099     {
3100         if( isdigit(*psz_check) )
3101             if(!next(&psz_check)) return;
3102     }
3103     if( *psz_check != ':' && *psz_check ) return;
3104     if( *psz_check == ':' && ++psz_check )
3105     {
3106         if( isdigit(*psz_check) )
3107             if(!next(&psz_check)) return;
3108     }
3109     if( *psz_check ) return;
3110
3111     /* Separate start and end */
3112     *psz++ = 0;
3113     if( ( psz_end = strchr( psz, '-' ) ) ) *psz_end++ = 0;
3114
3115     /* Look for the start title */
3116     *pi_title_start = strtol( psz, &psz_next, 0 );
3117     if( !*pi_title_start && psz == psz_next ) *pi_title_start = -1;
3118     *pi_title_end = *pi_title_start;
3119     psz = psz_next;
3120
3121     /* Look for the start chapter */
3122     if( *psz ) psz++;
3123     *pi_chapter_start = strtol( psz, &psz_next, 0 );
3124     if( !*pi_chapter_start && psz == psz_next ) *pi_chapter_start = -1;
3125     *pi_chapter_end = *pi_chapter_start;
3126
3127     if( psz_end )
3128     {
3129         /* Look for the end title */
3130         *pi_title_end = strtol( psz_end, &psz_next, 0 );
3131         if( !*pi_title_end && psz_end == psz_next ) *pi_title_end = -1;
3132         psz_end = psz_next;
3133
3134         /* Look for the end chapter */
3135         if( *psz_end ) psz_end++;
3136         *pi_chapter_end = strtol( psz_end, &psz_next, 0 );
3137         if( !*pi_chapter_end && psz_end == psz_next ) *pi_chapter_end = -1;
3138     }
3139
3140     msg_Dbg( p_input, "source=`%s' title=%d/%d seekpoint=%d/%d",
3141              psz_source, *pi_title_start, *pi_chapter_start,
3142              *pi_title_end, *pi_chapter_end );
3143 }
3144
3145 /*****************************************************************************
3146  * input_AddSubtitles: add a subtitles file and enable it
3147  *****************************************************************************/
3148 static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced )
3149 {
3150     input_source_t *sub;
3151     vlc_value_t count;
3152     vlc_value_t list;
3153     char *psz_path, *psz_extension;
3154
3155     /* if we are provided a subtitle.sub file,
3156      * see if we don't have a subtitle.idx and use it instead */
3157     psz_path = strdup( psz_subtitle );
3158     if( psz_path )
3159     {
3160         psz_extension = strrchr( psz_path, '.');
3161         if( psz_extension && strcmp( psz_extension, ".sub" ) == 0 )
3162         {
3163             struct stat st;
3164
3165             strcpy( psz_extension, ".idx" );
3166
3167             if( !utf8_stat( psz_path, &st ) && S_ISREG( st.st_mode ) )
3168             {
3169                 msg_Dbg( p_input, "using %s subtitles file instead of %s",
3170                          psz_path, psz_subtitle );
3171                 strcpy( psz_subtitle, psz_path );
3172             }
3173         }
3174         free( psz_path );
3175     }
3176
3177     var_Change( p_input, "spu-es", VLC_VAR_CHOICESCOUNT, &count, NULL );
3178
3179     sub = InputSourceNew( p_input );
3180     if( !sub || InputSourceInit( p_input, sub, psz_subtitle, "subtitle" ) )
3181     {
3182         free( sub );
3183         return;
3184     }
3185     TAB_APPEND( p_input->p->i_slave, p_input->p->slave, sub );
3186
3187     /* Select the ES */
3188     if( b_forced && !var_Change( p_input, "spu-es", VLC_VAR_GETLIST, &list, NULL ) )
3189     {
3190         if( count.i_int == 0 )
3191             count.i_int++;
3192         /* if it was first one, there is disable too */
3193
3194         if( count.i_int < list.p_list->i_count )
3195         {
3196             const int i_id = list.p_list->p_values[count.i_int].i_int;
3197
3198             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_DEFAULT_BY_ID, i_id );
3199             es_out_Control( p_input->p->p_es_out_display, ES_OUT_SET_ES_BY_ID, i_id );
3200         }
3201         var_FreeList( &list, NULL );
3202     }
3203 }
3204
3205 /*****************************************************************************
3206  * Statistics
3207  *****************************************************************************/
3208 void input_UpdateStatistic( input_thread_t *p_input,
3209                             input_statistic_t i_type, int i_delta )
3210 {
3211     assert( p_input->p->i_state != INIT_S );
3212
3213     vlc_mutex_lock( &p_input->p->counters.counters_lock);
3214     switch( i_type )
3215     {
3216 #define I(c) stats_UpdateInteger( p_input, p_input->p->counters.c, i_delta, NULL )
3217     case INPUT_STATISTIC_DECODED_VIDEO:
3218         I(p_decoded_video);
3219         break;
3220     case INPUT_STATISTIC_DECODED_AUDIO:
3221         I(p_decoded_audio);
3222         break;
3223     case INPUT_STATISTIC_DECODED_SUBTITLE:
3224         I(p_decoded_sub);
3225         break;
3226     case INPUT_STATISTIC_SENT_PACKET:
3227         I(p_sout_sent_packets);
3228         break;
3229 #undef I
3230     case INPUT_STATISTIC_SENT_BYTE:
3231     {
3232         int i_bytes; /* That's pretty stupid to define it as an integer, it will overflow
3233                         really fast ... */
3234         if( !stats_UpdateInteger( p_input, p_input->p->counters.p_sout_sent_bytes, i_delta, &i_bytes ) )
3235             stats_UpdateFloat( p_input, p_input->p->counters.p_sout_send_bitrate, i_bytes, NULL );
3236         break;
3237     }
3238     default:
3239         msg_Err( p_input, "Invalid statistic type %d (internal error)", i_type );
3240         break;
3241     }
3242     vlc_mutex_unlock( &p_input->p->counters.counters_lock);
3243 }
3244
3245 /**/
3246 /* TODO FIXME nearly the same logic that snapshot code */
3247 char *input_CreateFilename( vlc_object_t *p_obj, const char *psz_path, const char *psz_prefix, const char *psz_extension )
3248 {
3249     char *psz_file;
3250     DIR *path;
3251
3252     path = utf8_opendir( psz_path );
3253     if( path )
3254     {
3255         closedir( path );
3256
3257         char *psz_tmp = str_format( p_obj, psz_prefix );
3258         if( !psz_tmp )
3259             return NULL;
3260
3261         char *psz_tmp2 = filename_sanitize( psz_tmp );
3262         free( psz_tmp );
3263
3264         if( !psz_tmp2 ||
3265             asprintf( &psz_file, "%s"DIR_SEP"%s%s%s",
3266                       psz_path, psz_tmp2,
3267                       psz_extension ? "." : "",
3268                       psz_extension ? psz_extension : "" ) < 0 )
3269             psz_file = NULL;
3270         free( psz_tmp2 );
3271         return psz_file;
3272     }
3273     else
3274     {
3275         psz_file = str_format( p_obj, psz_path );
3276         path_sanitize( psz_file );
3277         return psz_file;
3278     }
3279 }
3280