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

   1 /*****************************************************************************
   2  * input.c: input thread
   3  * Read an MPEG2 stream, demultiplex and parse it before sending it to
   4  * decoders.
   5  *****************************************************************************
   6  * Copyright (C) 1998, 1999, 2000 VideoLAN
   7  * $Id: input.c,v 1.95 2001/04/08 09:04:33 stef Exp $
   8  *
   9  * Authors: Christophe Massiot <massiot@via.ecp.fr>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  24  *****************************************************************************/
  25
  26 /*****************************************************************************
  27  * Preamble
  28  *****************************************************************************/
  29 #include "defs.h"
  30
  31 #include <stdlib.h>
  32 #include <sys/types.h>
  33 #include <sys/stat.h>
  34 #include <fcntl.h>
  35 #include <unistd.h>
  36 #include <string.h>
  37 #include <errno.h>
  38
  39 /* Network functions */
  40
  41 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
  42 #include <netdb.h>                                             /* hostent ... */
  43 #include <sys/socket.h>
  44 #include <netinet/in.h>
  45 #include <arpa/inet.h>
  46 #include <sys/types.h>
  47 #include <sys/socket.h>
  48 #endif
  49
  50 #ifdef STATS
  51 #   include <sys/times.h>
  52 #endif
  53
  54 #include "config.h"
  55 #include "common.h"
  56 #include "threads.h"
  57 #include "mtime.h"
  58 #include "netutils.h"
  59 #include "modules.h"
  60
  61 #include "intf_msg.h"
  62 #include "intf_playlist.h"
  63
  64 #include "stream_control.h"
  65 #include "input_ext-intf.h"
  66 #include "input_ext-dec.h"
  67
  68 #include "input.h"
  69 #include "interface.h"
  70
  71 #include "main.h"
  72
  73  /* #include <netutils.h> */
  74
  75
  76 /*****************************************************************************
  77  * Local prototypes
  78  *****************************************************************************/
  79 static void RunThread       ( input_thread_t *p_input );
  80 static  int InitThread      ( input_thread_t *p_input );
  81 static void ErrorThread     ( input_thread_t *p_input );
  82 static void DestroyThread   ( input_thread_t *p_input );
  83 static void EndThread       ( input_thread_t *p_input );
  84
  85 /*****************************************************************************
  86  * input_CreateThread: creates a new input thread
  87  *****************************************************************************
  88  * This function creates a new input, and returns a pointer
  89  * to its description. On error, it returns NULL.
  90  * If pi_status is NULL, then the function will block until the thread is ready.
  91  * If not, it will be updated using one of the THREAD_* constants.
  92  *****************************************************************************/
  93 input_thread_t *input_CreateThread ( playlist_item_t *p_item, int *pi_status )
  94 {
  95     input_thread_t *    p_input;                        /* thread descriptor */
  96     int                 i_status;                           /* thread status */
  97
  98     /* Allocate descriptor */
  99     p_input = (input_thread_t *)malloc( sizeof(input_thread_t) );
 100     if( p_input == NULL )
 101     {
 102         intf_ErrMsg( "input error: can't allocate input thread (%s)",
 103                      strerror(errno) );
 104         return( NULL );
 105     }
 106
 107     /* Packets read once */
 108     p_input->i_read_once = INPUT_READ_ONCE;
 109
 110     /* Initialize thread properties */
 111     p_input->b_die              = 0;
 112     p_input->b_error            = 0;
 113     p_input->b_eof              = 0;
 114
 115     /* Set target */
 116     p_input->p_source           = p_item->psz_name;
 117
 118     /* I have never understood that stuff --Meuuh */
 119     p_input->pi_status          = (pi_status != NULL) ? pi_status : &i_status;
 120     *p_input->pi_status         = THREAD_CREATE;
 121
 122     /* Initialize stream description */
 123     p_input->stream.i_es_number = 0;
 124     p_input->stream.i_selected_es_number = 0;
 125     p_input->stream.i_pgrm_number = 0;
 126     p_input->stream.i_new_status = p_input->stream.i_new_rate = 0;
 127     p_input->stream.i_mux_rate = 0;
 128
 129     p_input->stream.i_area_nb = 0;
 130     p_input->stream.pp_areas = NULL;
 131     /* By default there is one areas in a stream */
 132     input_AddArea( p_input );
 133     p_input->stream.p_selected_area = p_input->stream.pp_areas[0];
 134     p_input->stream.p_selected_area->i_seek = NO_SEEK;
 135
 136     /* Initialize stream control properties. */
 137     p_input->stream.control.i_status = PLAYING_S;
 138     p_input->stream.control.i_rate = DEFAULT_RATE;
 139     p_input->stream.control.b_mute = 0;
 140     p_input->stream.control.b_bw = 0;
 141
 142     /* Initialize default settings for spawned decoders */
 143     p_input->p_default_aout = p_main->p_aout;
 144     p_input->p_default_vout = p_main->p_vout;
 145
 146     /* Create thread and set locks. */
 147     vlc_mutex_init( &p_input->stream.stream_lock );
 148     vlc_cond_init( &p_input->stream.stream_wait );
 149     vlc_mutex_init( &p_input->stream.control.control_lock );
 150     if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
 151                            (void *) p_input ) )
 152     {
 153         intf_ErrMsg( "input error: can't create input thread (%s)",
 154                      strerror(errno) );
 155         free( p_input );
 156         return( NULL );
 157     }
 158
 159     /* If status is NULL, wait until the thread is created */
 160     if( pi_status == NULL )
 161     {
 162         do
 163         {
 164             msleep( THREAD_SLEEP );
 165         } while( (i_status != THREAD_READY) && (i_status != THREAD_ERROR)
 166                 && (i_status != THREAD_FATAL) );
 167         if( i_status != THREAD_READY )
 168         {
 169             return( NULL );
 170         }
 171     }
 172     return( p_input );
 173 }
 174
 175 /*****************************************************************************
 176  * input_DestroyThread: mark an input thread as zombie
 177  *****************************************************************************
 178  * This function should not return until the thread is effectively cancelled.
 179  *****************************************************************************/
 180 void input_DestroyThread( input_thread_t *p_input, int *pi_status )
 181 {
 182     int         i_status;                                   /* thread status */
 183
 184     /* Set status */
 185     p_input->pi_status = (pi_status != NULL) ? pi_status : &i_status;
 186     *p_input->pi_status = THREAD_DESTROY;
 187
 188     /* Request thread destruction */
 189     p_input->b_die = 1;
 190
 191     /* Make the thread exit of an eventual vlc_cond_wait() */
 192     vlc_mutex_lock( &p_input->stream.stream_lock );
 193     vlc_cond_signal( &p_input->stream.stream_wait );
 194     vlc_mutex_unlock( &p_input->stream.stream_lock );
 195
 196     /* If status is NULL, wait until thread has been destroyed */
 197     if( pi_status == NULL )
 198     {
 199         do
 200         {
 201             msleep( THREAD_SLEEP );
 202         } while ( (i_status != THREAD_OVER) && (i_status != THREAD_ERROR)
 203                   && (i_status != THREAD_FATAL) );
 204     }
 205 }
 206
 207 /*****************************************************************************
 208  * RunThread: main thread loop
 209  *****************************************************************************
 210  * Thread in charge of processing the network packets and demultiplexing.
 211  *****************************************************************************/
 212 static void RunThread( input_thread_t *p_input )
 213 {
 214     int                     i_error, i;
 215
 216     if( InitThread( p_input ) )
 217     {
 218
 219         /* If we failed, wait before we are killed, and exit */
 220         *p_input->pi_status = THREAD_ERROR;
 221         p_input->b_error = 1;
 222         ErrorThread( p_input );
 223         DestroyThread( p_input );
 224         return;
 225     }
 226
 227     while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
 228     {
 229         data_packet_t *         pp_packets[p_input->i_read_once];
 230
 231 #ifdef STATS
 232         p_input->c_loops++;
 233 #endif
 234
 235         vlc_mutex_lock( &p_input->stream.stream_lock );
 236         if( p_input->stream.p_selected_area->i_seek != NO_SEEK )
 237         {
 238             if( p_input->stream.b_seekable && p_input->pf_seek != NULL )
 239             {
 240                 p_input->pf_seek( p_input,
 241                                   p_input->stream.p_selected_area->i_seek );
 242
 243                 for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
 244                 {
 245                     pgrm_descriptor_t * p_pgrm
 246                                             = p_input->stream.pp_programs[i];
 247                     /* Escape all decoders for the stream discontinuity they
 248                      * will encounter. */
 249                     input_EscapeDiscontinuity( p_input, p_pgrm );
 250
 251                     /* Reinitialize synchro. */
 252                     p_pgrm->i_synchro_state = SYNCHRO_REINIT;
 253                 }
 254             }
 255             p_input->stream.p_selected_area->i_seek = NO_SEEK;
 256         }
 257         vlc_mutex_unlock( &p_input->stream.stream_lock );
 258
 259         i_error = p_input->pf_read( p_input, pp_packets );
 260
 261         /* Demultiplex read packets. */
 262         for( i = 0; i < p_input->i_read_once && pp_packets[i] != NULL; i++ )
 263         {
 264             p_input->pf_demux( p_input, pp_packets[i] );
 265         }
 266
 267         if( i_error )
 268         {
 269             if( i_error == 1 )
 270             {
 271                 /* End of file - we do not set b_die because only the
 272                  * interface is allowed to do so. */
 273                 intf_WarnMsg( 1, "End of file reached" );
 274                 p_input->b_eof = 1;
 275             }
 276             else
 277             {
 278                 p_input->b_error = 1;
 279             }
 280         }
 281     }
 282
 283     if( p_input->b_error || p_input->b_eof )
 284     {
 285         ErrorThread( p_input );
 286     }
 287
 288     EndThread( p_input );
 289
 290     DestroyThread( p_input );
 291
 292     intf_DbgMsg("Thread end");
 293 }
 294
 295 /*****************************************************************************
 296  * InitThread: init the input Thread
 297  *****************************************************************************/
 298 static int InitThread( input_thread_t * p_input )
 299 {
 300
 301 #ifdef STATS
 302     /* Initialize statistics */
 303     p_input->c_loops                    = 0;
 304     p_input->c_bytes                    = 0;
 305     p_input->c_payload_bytes            = 0;
 306     p_input->c_packets_read             = 0;
 307     p_input->c_packets_trashed          = 0;
 308 #endif
 309
 310     p_input->p_input_module = module_Need( p_main->p_bank,
 311                                            MODULE_CAPABILITY_INPUT,
 312                                            (probedata_t *)p_input );
 313
 314     if( p_input->p_input_module == NULL )
 315     {
 316         intf_ErrMsg( "input error: no suitable input module for `%s'",
 317                      p_input->p_source );
 318         return( -1 );
 319     }
 320
 321 #define f p_input->p_input_module->p_functions->input.functions.input
 322     p_input->pf_init          = f.pf_init;
 323     p_input->pf_open          = f.pf_open;
 324     p_input->pf_close         = f.pf_close;
 325     p_input->pf_end           = f.pf_end;
 326     p_input->pf_read          = f.pf_read;
 327     p_input->pf_set_area      = f.pf_set_area;
 328     p_input->pf_demux         = f.pf_demux;
 329     p_input->pf_new_packet    = f.pf_new_packet;
 330     p_input->pf_new_pes       = f.pf_new_pes;
 331     p_input->pf_delete_packet = f.pf_delete_packet;
 332     p_input->pf_delete_pes    = f.pf_delete_pes;
 333     p_input->pf_rewind        = f.pf_rewind;
 334     p_input->pf_seek          = f.pf_seek;
 335 #undef f
 336     p_input->pf_open( p_input );
 337
 338     if( p_input->b_error )
 339     {
 340         /* We barfed -- exit nicely */
 341         p_input->pf_close( p_input );
 342         module_Unneed( p_main->p_bank, p_input->p_input_module );
 343         return( -1 );
 344     }
 345
 346     p_input->pf_init( p_input );
 347
 348     if( p_input->b_error )
 349     {
 350         /* We barfed -- exit nicely */
 351         p_input->pf_close( p_input );
 352         module_Unneed( p_main->p_bank, p_input->p_input_module );
 353         return( -1 );
 354     }
 355
 356     *p_input->pi_status = THREAD_READY;
 357
 358     return( 0 );
 359 }
 360
 361 /*****************************************************************************
 362  * ErrorThread: RunThread() error loop
 363  *****************************************************************************
 364  * This function is called when an error occured during thread main's loop.
 365  *****************************************************************************/
 366 static void ErrorThread( input_thread_t *p_input )
 367 {
 368     while( !p_input->b_die )
 369     {
 370         /* Sleep a while */
 371         msleep( INPUT_IDLE_SLEEP );
 372     }
 373 }
 374
 375 /*****************************************************************************
 376  * EndThread: end the input thread
 377  *****************************************************************************/
 378 static void EndThread( input_thread_t * p_input )
 379 {
 380     int *       pi_status;                                  /* thread status */
 381
 382     /* Store status */
 383     pi_status = p_input->pi_status;
 384     *pi_status = THREAD_END;
 385
 386 #ifdef STATS
 387     {
 388         struct tms cpu_usage;
 389         times( &cpu_usage );
 390
 391         intf_Msg("input stats: cpu usage (user: %d, system: %d)",
 392                  cpu_usage.tms_utime, cpu_usage.tms_stime);
 393     }
 394 #endif
 395
 396     /* Free all ES and destroy all decoder threads */
 397     input_EndStream( p_input );
 398
 399     /* Free demultiplexer's data */
 400     p_input->pf_end( p_input );
 401
 402     /* Close stream */
 403     p_input->pf_close( p_input );
 404
 405     /* Release modules */
 406     module_Unneed( p_main->p_bank, p_input->p_input_module );
 407
 408 }
 409
 410 /*****************************************************************************
 411  * DestroyThread: destroy the input thread
 412  *****************************************************************************/
 413 static void DestroyThread( input_thread_t * p_input )
 414 {
 415     int *       pi_status;                                  /* thread status */
 416
 417     /* Store status */
 418     pi_status = p_input->pi_status;
 419
 420     /* Destroy Mutex locks */
 421     vlc_mutex_destroy( &p_input->stream.control.control_lock );
 422     vlc_mutex_destroy( &p_input->stream.stream_lock );
 423
 424     /* Free input structure */
 425     free( p_input );
 426
 427     /* Update status */
 428     *pi_status = THREAD_OVER;
 429 }
 430
 431 /*****************************************************************************
 432  * input_FileOpen : open a file descriptor
 433  *****************************************************************************/
 434 void input_FileOpen( input_thread_t * p_input )
 435 {
 436     struct stat         stat_info;
 437     int                 i_stat;
 438
 439     char *psz_name = p_input->p_source;
 440
 441     /* FIXME: this code ought to be in the plugin so that code can
 442      * be shared with the *_Probe function */
 443     if( ( i_stat = stat( psz_name, &stat_info ) ) == (-1) )
 444     {
 445         int i_size = strlen( psz_name );
 446
 447         if( ( i_size > 4 )
 448             && !strncasecmp( psz_name, "dvd:", 4 ) )
 449         {
 450             /* get rid of the 'dvd:' stuff and try again */
 451             psz_name += 4;
 452             i_stat = stat( psz_name, &stat_info );
 453         }
 454         else if( ( i_size > 5 )
 455                  && !strncasecmp( psz_name, "file:", 5 ) )
 456         {
 457             /* get rid of the 'file:' stuff and try again */
 458             psz_name += 5;
 459             i_stat = stat( psz_name, &stat_info );
 460         }
 461
 462         if( i_stat == (-1) )
 463         {
 464             intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
 465                          psz_name, strerror(errno));
 466             p_input->b_error = 1;
 467             return;
 468         }
 469     }
 470
 471     vlc_mutex_lock( &p_input->stream.stream_lock );
 472
 473     /* If we are here we can control the pace... */
 474     p_input->stream.b_pace_control = 1;
 475
 476     if( S_ISREG(stat_info.st_mode) || S_ISCHR(stat_info.st_mode)
 477          || S_ISBLK(stat_info.st_mode) )
 478     {
 479         p_input->stream.b_seekable = 1;
 480         p_input->stream.p_selected_area->i_size = stat_info.st_size;
 481     }
 482     else if( S_ISFIFO(stat_info.st_mode)
 483 #ifndef SYS_BEOS
 484              || S_ISSOCK(stat_info.st_mode)
 485 #endif
 486              )
 487     {
 488         p_input->stream.b_seekable = 0;
 489         p_input->stream.p_selected_area->i_size = 0;
 490     }
 491     else
 492     {
 493         vlc_mutex_unlock( &p_input->stream.stream_lock );
 494         intf_ErrMsg( "input error: unknown file type for `%s'",
 495                      psz_name );
 496         p_input->b_error = 1;
 497         return;
 498     }
 499
 500     p_input->stream.p_selected_area->i_tell = 0;
 501     vlc_mutex_unlock( &p_input->stream.stream_lock );
 502
 503     intf_Msg( "input: opening %s", p_input->p_source );
 504     if( (p_input->i_handle = open( psz_name,
 505                                    /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
 506     {
 507         intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
 508         p_input->b_error = 1;
 509         return;
 510     }
 511
 512 }
 513
 514 /*****************************************************************************
 515  * input_FileClose : close a file descriptor
 516  *****************************************************************************/
 517 void input_FileClose( input_thread_t * p_input )
 518 {
 519     close( p_input->i_handle );
 520
 521     return;
 522 }
 523
 524
 525 #if !defined( SYS_BEOS ) && !defined( SYS_NTO )
 526 /*****************************************************************************
 527  * input_NetworkOpen : open a network socket
 528  *****************************************************************************/
 529 void input_NetworkOpen( input_thread_t * p_input )
 530 {
 531
 532     int                 i_option_value, i_port;
 533     struct sockaddr_in  s_socket;
 534     boolean_t           b_broadcast;
 535
 536     /* FIXME : we don't handle channels for the moment */
 537
 538     /* Get the remote server */
 539     if( p_input->p_source == NULL )
 540     {
 541         p_input->p_source = main_GetPszVariable( INPUT_SERVER_VAR,
 542                                                  INPUT_SERVER_DEFAULT );
 543     }
 544
 545     /* Open a SOCK_DGRAM (UDP) socket, in the AF_INET domain, automatic (0)
 546      * protocol */
 547     p_input->i_handle = socket( AF_INET, SOCK_DGRAM, 0 );
 548     if( p_input->i_handle == -1 )
 549     {
 550         intf_ErrMsg("NetworkOpen : can't create socket : %s", strerror(errno));
 551         p_input->b_error = 1;
 552         return;
 553     }
 554
 555     /* We may want to reuse an already used socket */
 556     i_option_value = 1;
 557     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
 558                     &i_option_value,sizeof( i_option_value ) ) == -1 )
 559     {
 560         intf_ErrMsg("NetworkOpen : can't configure socket (SO_REUSEADDR: %s)",
 561                     strerror(errno));
 562         close( p_input->i_handle );
 563         p_input->b_error = 1;
 564         return;
 565     }
 566
 567     /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s) to avoid
 568      * packet loss caused by scheduling problems */
 569     i_option_value = 524288;
 570     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF, &i_option_value,
 571                     sizeof( i_option_value ) ) == -1 )
 572     {
 573         intf_ErrMsg("NetworkOpen : can't configure socket (SO_RCVBUF: %s)",
 574                     strerror(errno));
 575         close( p_input->i_handle );
 576         p_input->b_error = 1;
 577         return;
 578     }
 579
 580     /* Get details about what we are supposed to do */
 581     b_broadcast = (boolean_t)main_GetIntVariable( INPUT_BROADCAST_VAR, 0 );
 582     i_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
 583
 584     /* TODO : here deal with channel stufs */
 585
 586     /* Build the local socket */
 587     if ( network_BuildLocalAddr( &s_socket, i_port, b_broadcast )
 588          == -1 )
 589     {
 590         close( p_input->i_handle );
 591         p_input->b_error = 1;
 592         return;
 593     }
 594
 595     /* Bind it */
 596     if( bind( p_input->i_handle, (struct sockaddr *)&s_socket,
 597               sizeof( s_socket ) ) < 0 )
 598     {
 599         intf_ErrMsg("NetworkOpen: can't bind socket (%s)", strerror(errno));
 600         close( p_input->i_handle );
 601         p_input->b_error = 1;
 602         return;
 603     }
 604
 605     /* Build socket for remote connection */
 606     if ( network_BuildRemoteAddr( &s_socket, p_input->p_source )
 607          == -1 )
 608     {
 609         close( p_input->i_handle );
 610         p_input->b_error = 1;
 611         return;
 612     }
 613
 614     /* And connect it ... should we really connect ? */
 615     if( connect( p_input->i_handle, (struct sockaddr *) &s_socket,
 616                  sizeof( s_socket ) ) == (-1) )
 617     {
 618         intf_ErrMsg("NetworkOpen: can't connect socket" );
 619         close( p_input->i_handle );
 620         p_input->b_error = 1;
 621         return;
 622     }
 623
 624     /* We can't pace control, but FIXME : bug in meuuh's code to sync PCR
 625      * with the server. */
 626     p_input->stream.b_pace_control = 1;
 627
 628     return;
 629 }
 630
 631 /*****************************************************************************
 632  * input_NetworkClose : close a network socket
 633  *****************************************************************************/
 634 void input_NetworkClose( input_thread_t * p_input )
 635 {
 636     close( p_input->i_handle );
 637     /* FIXME: deal with channels */
 638 }
 639 #endif