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.93 2001/03/15 01:42:20 sam 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 #ifndef SYS_BEOS
  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     *p_input->pi_status = THREAD_READY;
 349
 350     return( 0 );
 351 }
 352
 353 /*****************************************************************************
 354  * ErrorThread: RunThread() error loop
 355  *****************************************************************************
 356  * This function is called when an error occured during thread main's loop.
 357  *****************************************************************************/
 358 static void ErrorThread( input_thread_t *p_input )
 359 {
 360     while( !p_input->b_die )
 361     {
 362         /* Sleep a while */
 363         msleep( INPUT_IDLE_SLEEP );
 364     }
 365 }
 366
 367 /*****************************************************************************
 368  * EndThread: end the input thread
 369  *****************************************************************************/
 370 static void EndThread( input_thread_t * p_input )
 371 {
 372     int *       pi_status;                                  /* thread status */
 373
 374     /* Store status */
 375     pi_status = p_input->pi_status;
 376     *pi_status = THREAD_END;
 377
 378 #ifdef STATS
 379     {
 380         struct tms cpu_usage;
 381         times( &cpu_usage );
 382
 383         intf_Msg("input stats: cpu usage (user: %d, system: %d)",
 384                  cpu_usage.tms_utime, cpu_usage.tms_stime);
 385     }
 386 #endif
 387
 388     /* Free all ES and destroy all decoder threads */
 389     input_EndStream( p_input );
 390
 391     /* Free demultiplexer's data */
 392     p_input->pf_end( p_input );
 393
 394     /* Close stream */
 395     p_input->pf_close( p_input );
 396
 397     /* Release modules */
 398     module_Unneed( p_main->p_bank, p_input->p_input_module );
 399
 400 }
 401
 402 /*****************************************************************************
 403  * DestroyThread: destroy the input thread
 404  *****************************************************************************/
 405 static void DestroyThread( input_thread_t * p_input )
 406 {
 407     int *       pi_status;                                  /* thread status */
 408
 409     /* Store status */
 410     pi_status = p_input->pi_status;
 411
 412     /* Destroy Mutex locks */
 413     vlc_mutex_destroy( &p_input->stream.control.control_lock );
 414     vlc_mutex_destroy( &p_input->stream.stream_lock );
 415
 416     /* Free input structure */
 417     free( p_input );
 418
 419     /* Update status */
 420     *pi_status = THREAD_OVER;
 421 }
 422
 423 /*****************************************************************************
 424  * input_FileOpen : open a file descriptor
 425  *****************************************************************************/
 426 void input_FileOpen( input_thread_t * p_input )
 427 {
 428     struct stat         stat_info;
 429     int                 i_stat;
 430
 431     char *psz_name = p_input->p_source;
 432
 433     /* FIXME: this code ought to be in the plugin so that code can
 434      * be shared with the *_Probe function */
 435     if( ( i_stat = stat( psz_name, &stat_info ) ) == (-1) )
 436     {
 437         int i_size = strlen( psz_name );
 438
 439         if( ( i_size > 4 )
 440             && !strncasecmp( psz_name, "dvd:", 4 ) )
 441         {
 442             /* get rid of the 'dvd:' stuff and try again */
 443             psz_name += 4;
 444             i_stat = stat( psz_name, &stat_info );
 445         }
 446         else if( ( i_size > 5 )
 447                  && !strncasecmp( psz_name, "file:", 5 ) )
 448         {
 449             /* get rid of the 'file:' stuff and try again */
 450             psz_name += 5;
 451             i_stat = stat( psz_name, &stat_info );
 452         }
 453
 454         if( i_stat == (-1) )
 455         {
 456             intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
 457                          psz_name, strerror(errno));
 458             p_input->b_error = 1;
 459             return;
 460         }
 461     }
 462
 463     vlc_mutex_lock( &p_input->stream.stream_lock );
 464
 465     /* If we are here we can control the pace... */
 466     p_input->stream.b_pace_control = 1;
 467
 468     if( S_ISREG(stat_info.st_mode) || S_ISCHR(stat_info.st_mode)
 469          || S_ISBLK(stat_info.st_mode) )
 470     {
 471         p_input->stream.b_seekable = 1;
 472         p_input->stream.p_selected_area->i_size = stat_info.st_size;
 473     }
 474     else if( S_ISFIFO(stat_info.st_mode)
 475 #ifndef SYS_BEOS
 476              || S_ISSOCK(stat_info.st_mode)
 477 #endif
 478              )
 479     {
 480         p_input->stream.b_seekable = 0;
 481         p_input->stream.p_selected_area->i_size = 0;
 482     }
 483     else
 484     {
 485         vlc_mutex_unlock( &p_input->stream.stream_lock );
 486         intf_ErrMsg( "input error: unknown file type for `%s'",
 487                      psz_name );
 488         p_input->b_error = 1;
 489         return;
 490     }
 491
 492     p_input->stream.p_selected_area->i_tell = 0;
 493     vlc_mutex_unlock( &p_input->stream.stream_lock );
 494
 495     intf_Msg( "input: opening %s", p_input->p_source );
 496     if( (p_input->i_handle = open( psz_name,
 497                                    /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
 498     {
 499         intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
 500         p_input->b_error = 1;
 501         return;
 502     }
 503
 504 }
 505
 506 /*****************************************************************************
 507  * input_FileClose : close a file descriptor
 508  *****************************************************************************/
 509 void input_FileClose( input_thread_t * p_input )
 510 {
 511     close( p_input->i_handle );
 512
 513     return;
 514 }
 515
 516
 517 #ifndef SYS_BEOS
 518 /*****************************************************************************
 519  * input_NetworkOpen : open a network socket
 520  *****************************************************************************/
 521 void input_NetworkOpen( input_thread_t * p_input )
 522 {
 523
 524     int                 i_option_value, i_port;
 525     struct sockaddr_in  s_socket;
 526     boolean_t           b_broadcast;
 527
 528     /* FIXME : we don't handle channels for the moment */
 529
 530     /* Get the remote server */
 531     if( p_input->p_source == NULL )
 532     {
 533         p_input->p_source = main_GetPszVariable( INPUT_SERVER_VAR,
 534                                                  INPUT_SERVER_DEFAULT );
 535     }
 536
 537     /* Open a SOCK_DGRAM (UDP) socket, in the AF_INET domain, automatic (0)
 538      * protocol */
 539     p_input->i_handle = socket( AF_INET, SOCK_DGRAM, 0 );
 540     if( p_input->i_handle == -1 )
 541     {
 542         intf_ErrMsg("NetworkOpen : can't create socket : %s", strerror(errno));
 543         p_input->b_error = 1;
 544         return;
 545     }
 546
 547     /* We may want to reuse an already used socket */
 548     i_option_value = 1;
 549     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
 550                     &i_option_value,sizeof( i_option_value ) ) == -1 )
 551     {
 552         intf_ErrMsg("NetworkOpen : can't configure socket (SO_REUSEADDR: %s)",
 553                     strerror(errno));
 554         close( p_input->i_handle );
 555         p_input->b_error = 1;
 556         return;
 557     }
 558
 559     /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s) to avoid
 560      * packet loss caused by scheduling problems */
 561     i_option_value = 524288;
 562     if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF, &i_option_value,
 563                     sizeof( i_option_value ) ) == -1 )
 564     {
 565         intf_ErrMsg("NetworkOpen : can't configure socket (SO_RCVBUF: %s)",
 566                     strerror(errno));
 567         close( p_input->i_handle );
 568         p_input->b_error = 1;
 569         return;
 570     }
 571
 572     /* Get details about what we are supposed to do */
 573     b_broadcast = (boolean_t)main_GetIntVariable( INPUT_BROADCAST_VAR, 0 );
 574     i_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
 575
 576     /* TODO : here deal with channel stufs */
 577
 578     /* Build the local socket */
 579     if ( network_BuildLocalAddr( &s_socket, i_port, b_broadcast )
 580          == -1 )
 581     {
 582         close( p_input->i_handle );
 583         p_input->b_error = 1;
 584         return;
 585     }
 586
 587     /* Bind it */
 588     if( bind( p_input->i_handle, (struct sockaddr *)&s_socket,
 589               sizeof( s_socket ) ) < 0 )
 590     {
 591         intf_ErrMsg("NetworkOpen: can't bind socket (%s)", strerror(errno));
 592         close( p_input->i_handle );
 593         p_input->b_error = 1;
 594         return;
 595     }
 596
 597     /* Build socket for remote connection */
 598     if ( network_BuildRemoteAddr( &s_socket, p_input->p_source )
 599          == -1 )
 600     {
 601         close( p_input->i_handle );
 602         p_input->b_error = 1;
 603         return;
 604     }
 605
 606     /* And connect it ... should we really connect ? */
 607     if( connect( p_input->i_handle, (struct sockaddr *) &s_socket,
 608                  sizeof( s_socket ) ) == (-1) )
 609     {
 610         intf_ErrMsg("NetworkOpen: can't connect socket" );
 611         close( p_input->i_handle );
 612         p_input->b_error = 1;
 613         return;
 614     }
 615
 616     /* We can't pace control, but FIXME : bug in meuuh's code to sync PCR
 617      * with the server. */
 618     p_input->stream.b_pace_control = 1;
 619
 620     return;
 621 }
 622
 623 /*****************************************************************************
 624  * input_NetworkClose : close a network socket
 625  *****************************************************************************/
 626 void input_NetworkClose( input_thread_t * p_input )
 627 {
 628     close( p_input->i_handle );
 629     /* FIXME: deal with channels */
 630 }
 631 #endif