input.c 27.9 KB
Newer Older
1 2
/*****************************************************************************
 * input.c: input thread
Michel Kaempf's avatar
Michel Kaempf committed
3 4
 * Read an MPEG2 stream, demultiplex and parse it before sending it to
 * decoders.
5 6
 *****************************************************************************
 * Copyright (C) 1998, 1999, 2000 VideoLAN
7
 * $Id: input.c,v 1.132 2001/10/01 16:18:48 massiot Exp $
8
 *
9
 * Authors: Christophe Massiot <massiot@via.ecp.fr>
10 11 12 13 14
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
15
 * 
16 17
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 19
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
20
 *
21 22 23
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
24
 *****************************************************************************/
Michel Kaempf's avatar
Michel Kaempf committed
25

26
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
27
 * Preamble
28
 *****************************************************************************/
29 30
#include "defs.h"

31 32 33 34
#include <stdlib.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
35 36

#ifdef HAVE_UNISTD_H
37
#   include <unistd.h>
38
#elif defined( _MSC_VER ) && defined( _WIN32 )
39
#   include <io.h>
40 41
#endif

42
#include <string.h>
43 44
#include <errno.h>

45 46 47
#ifdef STRNCASECMP_IN_STRINGS_H
#   include <strings.h>
#endif
48 49

#ifdef WIN32
50 51 52 53 54 55 56 57
#   include <winsock2.h>
#elif !defined( SYS_BEOS ) && !defined( SYS_NTO )
#   include <netdb.h>                                         /* hostent ... */
#   include <sys/socket.h>
#   include <netinet/in.h>
#   include <arpa/inet.h>
#   include <sys/types.h>
#   include <sys/socket.h>
58
#endif
59

60
#include <sys/times.h>
61

Michel Kaempf's avatar
Michel Kaempf committed
62
#include "config.h"
63 64
#include "common.h"
#include "threads.h"
Michel Kaempf's avatar
Michel Kaempf committed
65
#include "mtime.h"
66
#include "netutils.h"
67
#include "modules.h"
68

69
#include "intf_msg.h"
70
#include "intf_playlist.h"
71

72 73 74
#include "stream_control.h"
#include "input_ext-intf.h"
#include "input_ext-dec.h"
75
#include "input_ext-plugins.h"
Michel Lespinasse's avatar
Yop,  
Michel Lespinasse committed
76

77 78 79
#include "interface.h"

#include "main.h"
Michel Kaempf's avatar
Michel Kaempf committed
80

81
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
82
 * Local prototypes
83
 *****************************************************************************/
84 85 86 87 88
static void RunThread       ( input_thread_t *p_input );
static  int InitThread      ( input_thread_t *p_input );
static void ErrorThread     ( input_thread_t *p_input );
static void DestroyThread   ( input_thread_t *p_input );
static void EndThread       ( input_thread_t *p_input );
Michel Kaempf's avatar
Michel Kaempf committed
89

90 91
static void FileOpen        ( input_thread_t *p_input );
static void FileClose       ( input_thread_t *p_input );
92
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
93 94
static void NetworkOpen     ( input_thread_t *p_input );
static void NetworkClose    ( input_thread_t *p_input );
95
#endif
96

97
/*****************************************************************************
98
 * input_CreateThread: creates a new input thread
99
 *****************************************************************************
100 101 102 103
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
 * If pi_status is NULL, then the function will block until the thread is ready.
 * If not, it will be updated using one of the THREAD_* constants.
104
 *****************************************************************************/
105
input_thread_t *input_CreateThread ( playlist_item_t *p_item, int *pi_status )
Michel Kaempf's avatar
Michel Kaempf committed
106
{
107 108 109
    input_thread_t *    p_input;                        /* thread descriptor */
    int                 i_status;                           /* thread status */

110 111 112
    /* Allocate descriptor */
    p_input = (input_thread_t *)malloc( sizeof(input_thread_t) );
    if( p_input == NULL )
Michel Kaempf's avatar
Michel Kaempf committed
113
    {
114 115
        intf_ErrMsg( "input error: can't allocate input thread (%s)",
                     strerror(errno) );
Michel Kaempf's avatar
Michel Kaempf committed
116 117
        return( NULL );
    }
118

119 120 121
    /* Packets read once */
    p_input->i_read_once = INPUT_READ_ONCE;

122 123 124
    /* Initialize thread properties */
    p_input->b_die              = 0;
    p_input->b_error            = 0;
125 126 127 128 129
    p_input->b_eof              = 0;

    /* Set target */
    p_input->p_source           = p_item->psz_name;

130
    /* I have never understood that stuff --Meuuh */
131 132
    p_input->pi_status          = (pi_status != NULL) ? pi_status : &i_status;
    *p_input->pi_status         = THREAD_CREATE;
Michel Kaempf's avatar
Michel Kaempf committed
133

134
    /* Initialize stream description */
135 136
    p_input->stream.i_es_number = 0;
    p_input->stream.i_selected_es_number = 0;
137
    p_input->stream.i_pgrm_number = 0;
138
    p_input->stream.i_new_status = p_input->stream.i_new_rate = 0;
139
    p_input->stream.b_new_mute = MUTE_NO_CHANGE;
Christophe Massiot's avatar
Christophe Massiot committed
140
    p_input->stream.i_mux_rate = 0;
Michel Kaempf's avatar
Michel Kaempf committed
141

142
    /* no stream, no area */
143 144
    p_input->stream.i_area_nb = 0;
    p_input->stream.pp_areas = NULL;
145
    p_input->stream.p_selected_area = NULL;
146
    p_input->stream.p_new_area = NULL;
147 148

    /* By default there is one area in a stream */
149
    input_AddArea( p_input );
150
    p_input->stream.p_selected_area = p_input->stream.pp_areas[0];
151

152 153 154 155
    /* Initialize stream control properties. */
    p_input->stream.control.i_status = PLAYING_S;
    p_input->stream.control.i_rate = DEFAULT_RATE;
    p_input->stream.control.b_mute = 0;
156 157 158 159
    p_input->stream.control.b_grayscale = main_GetIntVariable(
                            VOUT_GRAYSCALE_VAR, VOUT_GRAYSCALE_DEFAULT );
    p_input->stream.control.i_smp = main_GetIntVariable(
                            VDEC_SMP_VAR, VDEC_SMP_DEFAULT );
Michel Kaempf's avatar
Michel Kaempf committed
160

161 162 163 164 165 166 167 168
    /* Setup callbacks */
    p_input->pf_file_open     = FileOpen;
    p_input->pf_file_close    = FileClose;
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
    p_input->pf_network_open  = NetworkOpen;
    p_input->pf_network_close = NetworkClose;
#endif

169 170
    intf_WarnMsg( 1, "input: playlist item `%s'", p_input->p_source );

171
    /* Create thread. */
172 173
    if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
                           (void *) p_input ) )
Michel Kaempf's avatar
Michel Kaempf committed
174
    {
175 176
        intf_ErrMsg( "input error: can't create input thread (%s)",
                     strerror(errno) );
Michel Kaempf's avatar
Michel Kaempf committed
177 178 179
        free( p_input );
        return( NULL );
    }
180

181 182 183 184
    /* If status is NULL, wait until the thread is created */
    if( pi_status == NULL )
    {
        do
185
        {
186
            msleep( THREAD_SLEEP );
187
        } while( (i_status != THREAD_READY) && (i_status != THREAD_ERROR)
188
                && (i_status != THREAD_FATAL) );
189 190
        if( i_status != THREAD_READY )
        {
191 192
            return( NULL );
        }
193
    }
Michel Kaempf's avatar
Michel Kaempf committed
194 195 196
    return( p_input );
}

197
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
198
 * input_DestroyThread: mark an input thread as zombie
199
 *****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
200
 * This function should not return until the thread is effectively cancelled.
201
 *****************************************************************************/
202
void input_DestroyThread( input_thread_t *p_input, int *pi_status )
Michel Kaempf's avatar
Michel Kaempf committed
203
{
204
    int         i_status;                                   /* thread status */
205 206 207

    /* Set status */
    p_input->pi_status = (pi_status != NULL) ? pi_status : &i_status;
208 209
    *p_input->pi_status = THREAD_DESTROY;

210 211
    /* Request thread destruction */
    p_input->b_die = 1;
Michel Kaempf's avatar
Michel Kaempf committed
212

213 214 215 216 217
    /* Make the thread exit of an eventual vlc_cond_wait() */
    vlc_mutex_lock( &p_input->stream.stream_lock );
    vlc_cond_signal( &p_input->stream.stream_wait );
    vlc_mutex_unlock( &p_input->stream.stream_lock );

218 219 220 221 222 223
    /* If status is NULL, wait until thread has been destroyed */
    if( pi_status == NULL )
    {
        do
        {
            msleep( THREAD_SLEEP );
224 225
        } while ( (i_status != THREAD_OVER) && (i_status != THREAD_ERROR)
                  && (i_status != THREAD_FATAL) );
226
    }
Michel Kaempf's avatar
Michel Kaempf committed
227 228
}

229
/*****************************************************************************
230
 * RunThread: main thread loop
231
 *****************************************************************************
232
 * Thread in charge of processing the network packets and demultiplexing.
233
 *****************************************************************************/
234
static void RunThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
235
{
236
    int                     i_error, i;
237
    data_packet_t **        pp_packets;
Michel Kaempf's avatar
Michel Kaempf committed
238

239 240 241 242 243 244 245 246 247
    if( InitThread( p_input ) )
    {
        /* If we failed, wait before we are killed, and exit */
        *p_input->pi_status = THREAD_ERROR;
        p_input->b_error = 1;
        ErrorThread( p_input );
        DestroyThread( p_input );
        return;
    }
Michel Kaempf's avatar
Michel Kaempf committed
248

249 250 251 252 253
    /* initialization is completed */
    vlc_mutex_lock( &p_input->stream.stream_lock );
    p_input->stream.b_changed = 1;
    vlc_mutex_unlock( &p_input->stream.stream_lock );

254 255 256
    pp_packets = (data_packet_t **) malloc( p_input->i_read_once *
                                        sizeof( data_packet_t * ) );
    if( pp_packets == NULL )
257
    {
258
        intf_ErrMsg( "input error: out of memory" );
259
        free( pp_packets );
260 261
        p_input->b_error = 1;
    }
262

263 264
    while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
    {
265
        p_input->c_loops++;
266

267
        vlc_mutex_lock( &p_input->stream.stream_lock );
268

269 270
        if( p_input->stream.p_new_area )
        {
271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287
            if( p_input->stream.b_seekable && p_input->pf_set_area != NULL )
            {

                p_input->pf_set_area( p_input, p_input->stream.p_new_area );

                for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
                {
                    pgrm_descriptor_t * p_pgrm
                                            = p_input->stream.pp_programs[i];
                    /* Escape all decoders for the stream discontinuity they
                     * will encounter. */
                    input_EscapeDiscontinuity( p_input, p_pgrm );

                    /* Reinitialize synchro. */
                    p_pgrm->i_synchro_state = SYNCHRO_REINIT;
                }
            }
288 289 290
            p_input->stream.p_new_area = NULL;
        }

291
        if( p_input->stream.p_selected_area->i_seek != NO_SEEK )
292
        {
293 294
            if( p_input->stream.b_seekable && p_input->pf_seek != NULL )
            {
295 296
                p_input->pf_seek( p_input,
                                  p_input->stream.p_selected_area->i_seek );
297 298 299 300 301 302 303 304 305 306 307 308 309

                for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
                {
                    pgrm_descriptor_t * p_pgrm
                                            = p_input->stream.pp_programs[i];
                    /* Escape all decoders for the stream discontinuity they
                     * will encounter. */
                    input_EscapeDiscontinuity( p_input, p_pgrm );

                    /* Reinitialize synchro. */
                    p_pgrm->i_synchro_state = SYNCHRO_REINIT;
                }
            }
310
            p_input->stream.p_selected_area->i_seek = NO_SEEK;
311
        }
312

313 314 315 316 317 318 319 320 321 322 323 324
        if( p_input->stream.p_removed_es )
        {
            input_UnselectES( p_input, p_input->stream.p_removed_es );
            p_input->stream.p_removed_es = NULL;
        }

        if( p_input->stream.p_newly_selected_es )
        {
            input_SelectES( p_input, p_input->stream.p_newly_selected_es );
            p_input->stream.p_newly_selected_es = NULL;
        }

325 326 327 328 329 330 331 332 333 334 335 336 337 338
        if( p_input->stream.b_new_mute != MUTE_NO_CHANGE )
        {
            if( p_input->stream.b_new_mute )
            {
                input_EscapeAudioDiscontinuity( p_input );
            }

            vlc_mutex_lock( &p_input->stream.control.control_lock );
            p_input->stream.control.b_mute = p_input->stream.b_new_mute;
            vlc_mutex_unlock( &p_input->stream.control.control_lock );

            p_input->stream.b_new_mute = MUTE_NO_CHANGE;
        }

339
        vlc_mutex_unlock( &p_input->stream.stream_lock );
340 341

        i_error = p_input->pf_read( p_input, pp_packets );
342

343
        /* Demultiplex read packets. */
344
        for( i = 0; i < p_input->i_read_once && pp_packets[i] != NULL; i++ )
345
        {
346
            p_input->stream.c_packets_read++;
347 348
            p_input->pf_demux( p_input, pp_packets[i] );
        }
349

350 351 352
        if( i_error )
        {
            if( i_error == 1 )
353
            {
354 355
                /* End of file - we do not set b_die because only the
                 * interface is allowed to do so. */
356
                intf_WarnMsg( 3, "input: EOF reached" );
357
                p_input->b_eof = 1;
358
            }
359
            else
360
            {
361
                p_input->b_error = 1;
362
            }
363 364 365
        }
    }

366 367
    free( pp_packets );

368
    if( p_input->b_error || p_input->b_eof )
369 370 371
    {
        ErrorThread( p_input );
    }
372

373
    EndThread( p_input );
374 375 376

    DestroyThread( p_input );

377
    intf_DbgMsg("input: Thread end");
378 379
}

380
/*****************************************************************************
381
 * InitThread: init the input Thread
382
 *****************************************************************************/
383
static int InitThread( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
384 385
{

386 387
    /* Initialize statistics */
    p_input->c_loops                    = 0;
388 389
    p_input->stream.c_packets_read      = 0;
    p_input->stream.c_packets_trashed   = 0;
390

391 392 393 394 395
    /* Set locks. */
    vlc_mutex_init( &p_input->stream.stream_lock );
    vlc_cond_init( &p_input->stream.stream_wait );
    vlc_mutex_init( &p_input->stream.control.control_lock );

396 397 398 399
    /* Default, might get overwritten */
    p_input->pf_open = p_input->pf_file_open;
    p_input->pf_close = p_input->pf_file_close;

400
    p_input->p_input_module = module_Need( MODULE_CAPABILITY_INPUT,
401
                                           (probedata_t *)p_input );
402 403

    if( p_input->p_input_module == NULL )
404
    {
405 406
        intf_ErrMsg( "input error: no suitable input module for `%s'",
                     p_input->p_source );
407
        return( -1 );
Michel Kaempf's avatar
Michel Kaempf committed
408
    }
409

410 411
#define f p_input->p_input_module->p_functions->input.functions.input
    p_input->pf_init          = f.pf_init;
412 413
    if( f.pf_open != NULL )
    {
414
        p_input->pf_open      = f.pf_open;
415 416 417
    }
    if( f.pf_close != NULL )
    {
418
        p_input->pf_close     = f.pf_close;
419
    }
420
    p_input->pf_end           = f.pf_end;
421
    p_input->pf_init_bit_stream= f.pf_init_bit_stream;
422
    p_input->pf_read          = f.pf_read;
423
    p_input->pf_set_area      = f.pf_set_area;
424 425 426 427 428 429 430 431
    p_input->pf_demux         = f.pf_demux;
    p_input->pf_new_packet    = f.pf_new_packet;
    p_input->pf_new_pes       = f.pf_new_pes;
    p_input->pf_delete_packet = f.pf_delete_packet;
    p_input->pf_delete_pes    = f.pf_delete_pes;
    p_input->pf_rewind        = f.pf_rewind;
    p_input->pf_seek          = f.pf_seek;
#undef f
432 433

    /* We found the appropriate plugin, open the target */
434
    p_input->pf_open( p_input );
435

436
    if( p_input->b_error )
437
    {
438
        /* We barfed -- exit nicely */
439
        module_Unneed( p_input->p_input_module );
440
        return( -1 );
441
    }
442 443

    p_input->pf_init( p_input );
444

445 446 447 448
    if( p_input->b_error )
    {
        /* We barfed -- exit nicely */
        p_input->pf_close( p_input );
449
        module_Unneed( p_input->p_input_module );
450 451 452
        return( -1 );
    }

453
    *p_input->pi_status = THREAD_READY;
454 455

    return( 0 );
Michel Kaempf's avatar
Michel Kaempf committed
456 457
}

458
/*****************************************************************************
459
 * ErrorThread: RunThread() error loop
460
 *****************************************************************************
461
 * This function is called when an error occured during thread main's loop.
462
 *****************************************************************************/
463
static void ErrorThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
464
{
465
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
466
    {
467 468
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
469 470 471
    }
}

472
/*****************************************************************************
473
 * EndThread: end the input thread
474
 *****************************************************************************/
475
static void EndThread( input_thread_t * p_input )
476
{
477
    int *       pi_status;                                  /* thread status */
478

479 480 481
    /* Store status */
    pi_status = p_input->pi_status;
    *pi_status = THREAD_END;
482

483
    if( p_main->b_stats )
484
    {
485 486
        /* Display statistics */
        struct tms  cpu_usage;
487 488
        times( &cpu_usage );

489 490 491 492 493
        intf_StatMsg( "input stats: %d loops consuming user: %d, system: %d",
                      p_input->c_loops,
                      cpu_usage.tms_utime, cpu_usage.tms_stime );

        input_DumpStream( p_input );
494 495 496 497 498 499 500 501
    }

    /* Free all ES and destroy all decoder threads */
    input_EndStream( p_input );

    /* Free demultiplexer's data */
    p_input->pf_end( p_input );

502 503 504
    /* Close stream */
    p_input->pf_close( p_input );

505
    /* Release modules */
506
    module_Unneed( p_input->p_input_module );
507

508 509 510 511 512 513 514 515 516 517 518
}

/*****************************************************************************
 * DestroyThread: destroy the input thread
 *****************************************************************************/
static void DestroyThread( input_thread_t * p_input )
{
    int *       pi_status;                                  /* thread status */

    /* Store status */
    pi_status = p_input->pi_status;
519

520 521
    /* Destroy Mutex locks */
    vlc_mutex_destroy( &p_input->stream.control.control_lock );
522
    vlc_mutex_destroy( &p_input->stream.stream_lock );
523
    
524
    /* Free input structure */
525
    free( p_input );
526

527 528
    /* Update status */
    *pi_status = THREAD_OVER;
529
}
530

531
/*****************************************************************************
532
 * FileOpen : open a file descriptor
533
 *****************************************************************************/
534
static void FileOpen( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
535
{
536
    struct stat         stat_info;
537 538 539
    int                 i_stat;

    char *psz_name = p_input->p_source;
Michel Kaempf's avatar
Michel Kaempf committed
540

541 542 543
    /* FIXME: this code ought to be in the plugin so that code can
     * be shared with the *_Probe function */
    if( ( i_stat = stat( psz_name, &stat_info ) ) == (-1) )
544
    {
545 546 547 548 549 550 551 552
        int i_size = strlen( psz_name );

        if( ( i_size > 4 )
            && !strncasecmp( psz_name, "dvd:", 4 ) )
        {
            /* get rid of the 'dvd:' stuff and try again */
            psz_name += 4;
            i_stat = stat( psz_name, &stat_info );
553
        }
554
        else if( ( i_size > 5 )
555 556 557 558 559
                 && !strncasecmp( psz_name, "file:", 5 ) )
        {
            /* get rid of the 'file:' stuff and try again */
            psz_name += 5;
            i_stat = stat( psz_name, &stat_info );
560
        }
561

562
        if( i_stat == (-1) )
563 564 565 566 567 568
        {
            intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
                         psz_name, strerror(errno));
            p_input->b_error = 1;
            return;
        }
569 570 571 572 573 574 575 576
    }

    vlc_mutex_lock( &p_input->stream.stream_lock );

    /* If we are here we can control the pace... */
    p_input->stream.b_pace_control = 1;

    if( S_ISREG(stat_info.st_mode) || S_ISCHR(stat_info.st_mode)
577
         || S_ISBLK(stat_info.st_mode) )
578 579
    {
        p_input->stream.b_seekable = 1;
580
        p_input->stream.p_selected_area->i_size = stat_info.st_size;
581
    }
582
    else if( S_ISFIFO(stat_info.st_mode)
583
#if !defined( SYS_BEOS ) && !defined( WIN32 )
584 585 586
             || S_ISSOCK(stat_info.st_mode)
#endif
             )
587
    {
588
        p_input->stream.b_seekable = 0;
589
        p_input->stream.p_selected_area->i_size = 0;
Benoit Steiner's avatar
Benoit Steiner committed
590 591 592
    }
    else
    {
593
        vlc_mutex_unlock( &p_input->stream.stream_lock );
594
        intf_ErrMsg( "input error: unknown file type for `%s'",
595
                     psz_name );
596 597 598
        p_input->b_error = 1;
        return;
    }
599

600
    p_input->stream.p_selected_area->i_tell = 0;
601 602
    vlc_mutex_unlock( &p_input->stream.stream_lock );

603
    intf_WarnMsg( 2, "input: opening file `%s'", p_input->p_source );
604
    if( (p_input->i_handle = open( psz_name,
605 606
                                   /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
    {
607
        intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
608 609
        p_input->b_error = 1;
        return;
Michel Kaempf's avatar
Michel Kaempf committed
610 611 612
    }

}
Stéphane Borel's avatar
Stéphane Borel committed
613 614

/*****************************************************************************
615
 * FileClose : close a file descriptor
Stéphane Borel's avatar
Stéphane Borel committed
616
 *****************************************************************************/
617
static void FileClose( input_thread_t * p_input )
Stéphane Borel's avatar
Stéphane Borel committed
618
{
619
    intf_WarnMsg( 2, "input: closing file `%s'", p_input->p_source );
620

621
    close( p_input->i_handle );
Stéphane Borel's avatar
Stéphane Borel committed
622

623
    return;
Stéphane Borel's avatar
Stéphane Borel committed
624
}
625

626
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
627
/*****************************************************************************
628
 * NetworkOpen : open a network socket 
629
 *****************************************************************************/
630
static void NetworkOpen( input_thread_t * p_input )
631
{
632
    char                *psz_server = NULL;
633
    char                *psz_broadcast = NULL;
634
    int                 i_port = 0;
635
    int                 i_opt;
636
    int                 i_opt_size;
637
    struct sockaddr_in  sock;
638 639
    unsigned int        i_mc_group;

640 641
#ifdef WIN32
    WSADATA Data;
642 643 644 645 646 647
    int i_err;
#endif
    
#ifdef WIN32
    /* WinSock Library Init. */
    i_err = WSAStartup( MAKEWORD( 1, 1 ), &Data );
648 649 650 651 652 653 654

    if( i_err )
    {
        intf_ErrMsg( "input: can't initiate WinSocks, error %i", i_err );
        return ;
    }
#endif
655 656
    
    /* Get the remote server */
657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690
    if( p_input->p_source != NULL )
    {
        psz_server = p_input->p_source;

        /* Skip the protocol name */
        while( *psz_server && *psz_server != ':' )
        {
            psz_server++;
        }

        /* Skip the "://" part */
        while( *psz_server && (*psz_server == ':' || *psz_server == '/') )
        {
            psz_server++;
        }

        /* Found a server name */
        if( *psz_server )
        {
            char *psz_port = psz_server;

            /* Skip the hostname part */
            while( *psz_port && *psz_port != ':' )
            {
                psz_port++;
            }

            /* Found a port name */
            if( *psz_port )
            {
                /* Replace ':' with '\0' */
                *psz_port = '\0';
                psz_port++;

691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715
                psz_broadcast = psz_port;
                while( *psz_broadcast && *psz_broadcast != ':' )
                {
                    psz_broadcast++;
                }

                if( *psz_broadcast )
                {
                    *psz_broadcast = '\0';
                    psz_broadcast++;
                    while( *psz_broadcast && *psz_broadcast == ':' )
                    {
                        psz_broadcast++;
                    }
                }
                else
                {
                    psz_broadcast = NULL;
                }

                /* port before broadcast address */
                if( *psz_port != ':' )
                {
                    i_port = atoi( psz_port );
                }
716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732
            }
        }
        else
        {
            psz_server = NULL;
        }
    }

    /* Check that we got a valid server */
    if( psz_server == NULL )
    {
        psz_server = main_GetPszVariable( INPUT_SERVER_VAR, 
                                          INPUT_SERVER_DEFAULT );
    }

    /* Check that we got a valid port */
    if( i_port == 0 )
733
    {
734
        i_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
735
    }
736 737 738 739

    if( psz_broadcast == NULL )
    {
        /* Are we broadcasting ? */
740 741 742 743 744 745 746 747 748 749
        if( main_GetIntVariable( INPUT_BROADCAST_VAR,
                                 INPUT_BROADCAST_DEFAULT ) )
        {
            psz_broadcast = main_GetPszVariable( INPUT_BCAST_ADDR_VAR,
                                                 INPUT_BCAST_ADDR_DEFAULT );
        }
        else
        {
           psz_broadcast = NULL; 
        }
750 751
    }

752
    intf_WarnMsg( 2, "input: server=%s port=%d broadcast=%s",
753 754
                     psz_server, i_port, psz_broadcast );

755 756 757 758 759
    /* Open a SOCK_DGRAM (UDP) socket, in the AF_INET domain, automatic (0)
     * protocol */
    p_input->i_handle = socket( AF_INET, SOCK_DGRAM, 0 );
    if( p_input->i_handle == -1 )
    {
760
        intf_ErrMsg( "input error: can't create socket (%s)", strerror(errno) );
761 762 763 764 765
        p_input->b_error = 1;
        return;
    }

    /* We may want to reuse an already used socket */
766
    i_opt = 1;
767
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
768
                    (void *) &i_opt, sizeof( i_opt ) ) == -1 )
769
    {
770 771
        intf_ErrMsg( "input error: can't configure socket (SO_REUSEADDR: %s)",
                     strerror(errno));
772 773 774 775 776 777 778
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Increase the receive buffer size to 1/2MB (8Mb/s during 1/2s) to avoid
     * packet loss caused by scheduling problems */
779 780
    i_opt = 0x80000;
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
781
                    (void *) &i_opt, sizeof( i_opt ) ) == -1 )
782
    {
783 784
        intf_ErrMsg( "input error: can't configure socket (SO_RCVBUF: %s)", 
                     strerror(errno));
785 786 787 788 789
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806
    /* Check if we really got what we have asked for, because Linux, etc.
     * will silently limit the max buffer size to net.core.rmem_max which
     * is typically only 65535 bytes */
    i_opt = 0;
    i_opt_size = sizeof( i_opt );
    if( getsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
                    (void*) &i_opt, &i_opt_size ) == -1 )
    {
        intf_ErrMsg( "input error: can't configure socket (SO_RCVBUF: %s)", 
                     strerror(errno));
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }
    
    if( i_opt < 0x80000 )
    {
807
        intf_WarnMsg( 1, "input warning: socket receive buffer size just %d instead of %d bytes.",
808 809 810
                     i_opt, 0x80000 );
    }

811
    /* Build the local socket */
812
    if ( network_BuildLocalAddr( &sock, i_port, psz_broadcast ) == -1 )
813
    {
814
        intf_ErrMsg( "input error: can't build local address" );
815 816 817 818
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }
819

820 821 822
    /* Required for IP_ADD_MEMBERSHIP */
    i_mc_group = sock.sin_addr.s_addr;

823 824 825 826 827
#if defined( WIN32 )
    if ( psz_broadcast != NULL )
    {
        sock.sin_addr.s_addr = INADDR_ANY;
    }
828
#define IN_MULTICAST(a)         IN_CLASSD(a)
829
#endif
830 831
    
    /* Bind it */
832 833
    if( bind( p_input->i_handle, (struct sockaddr *)&sock, 
              sizeof( sock ) ) < 0 )
834
    {
835
        intf_ErrMsg( "input error: can't bind socket (%s)", strerror(errno) );
836 837 838 839 840
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858
    /* Join the m/c group if sock is a multicast address */
    if( IN_MULTICAST( ntohl(i_mc_group) ) )
    {
        struct ip_mreq imr;

        imr.imr_interface.s_addr = htonl(INADDR_ANY);
        imr.imr_multiaddr.s_addr = i_mc_group;
        if( setsockopt( p_input->i_handle, IPPROTO_IP,IP_ADD_MEMBERSHIP,
                        (char*)&imr, sizeof(struct ip_mreq) ) == -1 )
        {
            intf_ErrMsg( "input error: failed to join IP multicast group (%s)",
                         strerror(errno) );
            close( p_input->i_handle);
            p_input->b_error = 1;
            return;
        }
    }

859
    /* Build socket for remote connection */
860
    if ( network_BuildRemoteAddr( &sock, psz_server ) == -1 )
861
    {
862
        intf_ErrMsg( "input error: can't build remote address" );
863 864 865 866 867
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

868
    /* And connect it */
869 870
    if( connect( p_input->i_handle, (struct sockaddr *) &sock,
                 sizeof( sock ) ) == (-1) )
871
    {
872
        intf_ErrMsg( "input error: can't connect socket (%s)", 
873
                     strerror(errno) );
874 875 876 877 878
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

879
    p_input->stream.b_pace_control = 0;
880
    p_input->stream.b_seekable = 0;
881 882

    intf_WarnMsg( 3, "input: successfully opened network mode" );
883 884 885 886 887
    
    return;
}

/*****************************************************************************
888
 * NetworkClose : close a network socket
889
 *****************************************************************************/
890
static void NetworkClose( input_thread_t * p_input )
891 892
{
    close( p_input->i_handle );
893

894 895 896
#ifdef WIN32 
    WSACleanup();
#endif
897

898
}
899
#endif
900