input.c 25.7 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.124 2001/06/21 07:22:03 sam 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 61 62 63
#ifdef STATS
#   include <sys/times.h>
#endif

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

71
#include "intf_msg.h"
72
#include "intf_playlist.h"
73

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

78
#include "input.h"
79 80 81
#include "interface.h"

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

83
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
84
 * Local prototypes
85
 *****************************************************************************/
86 87 88 89 90
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
91

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

99
/*****************************************************************************
100
 * input_CreateThread: creates a new input thread
101
 *****************************************************************************
102 103 104 105
 * 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.
106
 *****************************************************************************/
107
input_thread_t *input_CreateThread ( playlist_item_t *p_item, int *pi_status )
Michel Kaempf's avatar
Michel Kaempf committed
108
{
109 110 111
    input_thread_t *    p_input;                        /* thread descriptor */
    int                 i_status;                           /* thread status */

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

121 122 123
    /* Packets read once */
    p_input->i_read_once = INPUT_READ_ONCE;

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

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

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

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

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

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

153 154 155 156 157
    /* 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;
    p_input->stream.control.b_bw = 0;
Michel Kaempf's avatar
Michel Kaempf committed
158

159 160 161 162 163 164 165 166
    /* 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

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

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

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

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

206 207
    /* Request thread destruction */
    p_input->b_die = 1;
Michel Kaempf's avatar
Michel Kaempf committed
208

209 210 211 212 213
    /* 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 );

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

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

235 236 237 238 239 240 241 242
    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 );
243
        free( p_input );
244 245
        return;
    }
Michel Kaempf's avatar
Michel Kaempf committed
246

247 248 249 250 251
    /* 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 );

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

261 262
    while( !p_input->b_die && !p_input->b_error && !p_input->b_eof )
    {
263
#ifdef STATS
264
        p_input->c_loops++;
265 266
#endif

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
        vlc_mutex_unlock( &p_input->stream.stream_lock );
326 327

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

329
        /* Demultiplex read packets. */
330
        for( i = 0; i < p_input->i_read_once && pp_packets[i] != NULL; i++ )
331 332 333
        {
            p_input->pf_demux( p_input, pp_packets[i] );
        }
334

335 336 337
        if( i_error )
        {
            if( i_error == 1 )
338
            {
339 340
                /* End of file - we do not set b_die because only the
                 * interface is allowed to do so. */
341
                intf_WarnMsg( 3, "input: EOF reached" );
342
                p_input->b_eof = 1;
343
            }
344
            else
345
            {
346
                p_input->b_error = 1;
347
            }
348 349 350
        }
    }

351 352
    free( pp_packets );

353
    if( p_input->b_error || p_input->b_eof )
354 355 356
    {
        ErrorThread( p_input );
    }
357

358
    EndThread( p_input );
359 360 361

    DestroyThread( p_input );

362
    intf_DbgMsg("input: Thread end");
363 364
}

365
/*****************************************************************************
366
 * InitThread: init the input Thread
367
 *****************************************************************************/
368
static int InitThread( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
369 370 371
{

#ifdef STATS
372 373 374 375 376 377
    /* Initialize statistics */
    p_input->c_loops                    = 0;
    p_input->c_bytes                    = 0;
    p_input->c_payload_bytes            = 0;
    p_input->c_packets_read             = 0;
    p_input->c_packets_trashed          = 0;
Michel Kaempf's avatar
Michel Kaempf committed
378
#endif
379

380 381 382 383 384
    /* 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 );

385 386 387 388
    /* Default, might get overwritten */
    p_input->pf_open = p_input->pf_file_open;
    p_input->pf_close = p_input->pf_file_close;

389
    p_input->p_input_module = module_Need( MODULE_CAPABILITY_INPUT,
390
                                           (probedata_t *)p_input );
391 392

    if( p_input->p_input_module == NULL )
393
    {
394 395
        intf_ErrMsg( "input error: no suitable input module for `%s'",
                     p_input->p_source );
396
        return( -1 );
Michel Kaempf's avatar
Michel Kaempf committed
397
    }
398

399 400
#define f p_input->p_input_module->p_functions->input.functions.input
    p_input->pf_init          = f.pf_init;
401 402 403 404 405 406 407 408
    if( f.pf_open != NULL )
    {
        p_input->pf_open          = f.pf_open;
    }
    if( f.pf_close != NULL )
    {
        p_input->pf_close         = f.pf_close;
    }
409 410
    p_input->pf_end           = f.pf_end;
    p_input->pf_read          = f.pf_read;
411
    p_input->pf_set_area      = f.pf_set_area;
412 413 414 415 416 417 418 419
    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
420 421

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

424
    if( p_input->b_error )
425
    {
426
        /* We barfed -- exit nicely */
427
        module_Unneed( p_input->p_input_module );
428
        return( -1 );
429
    }
430 431

    p_input->pf_init( p_input );
432

433 434 435 436
    if( p_input->b_error )
    {
        /* We barfed -- exit nicely */
        p_input->pf_close( p_input );
437
        module_Unneed( p_input->p_input_module );
438 439 440
        return( -1 );
    }

441
    *p_input->pi_status = THREAD_READY;
442 443

    return( 0 );
Michel Kaempf's avatar
Michel Kaempf committed
444 445
}

446
/*****************************************************************************
447
 * ErrorThread: RunThread() error loop
448
 *****************************************************************************
449
 * This function is called when an error occured during thread main's loop.
450
 *****************************************************************************/
451
static void ErrorThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
452
{
453
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
454
    {
455 456
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
457 458 459
    }
}

460
/*****************************************************************************
461
 * EndThread: end the input thread
462
 *****************************************************************************/
463
static void EndThread( input_thread_t * p_input )
464
{
465
    int *       pi_status;                                  /* thread status */
466

467 468 469
    /* Store status */
    pi_status = p_input->pi_status;
    *pi_status = THREAD_END;
470

471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486
#ifdef STATS
    {
        struct tms cpu_usage;
        times( &cpu_usage );

        intf_Msg("input stats: cpu usage (user: %d, system: %d)",
                 cpu_usage.tms_utime, cpu_usage.tms_stime);
    }
#endif

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

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

487 488 489
    /* Close stream */
    p_input->pf_close( p_input );

490
    /* Release modules */
491
    module_Unneed( p_input->p_input_module );
492

493 494 495 496 497 498 499 500 501 502 503
}

/*****************************************************************************
 * 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;
504

505 506
    /* Destroy Mutex locks */
    vlc_mutex_destroy( &p_input->stream.control.control_lock );
507
    vlc_mutex_destroy( &p_input->stream.stream_lock );
508
    
509
    /* Free input structure */
510
    free( p_input );
511

512 513
    /* Update status */
    *pi_status = THREAD_OVER;
514
}
515

516
/*****************************************************************************
517
 * FileOpen : open a file descriptor
518
 *****************************************************************************/
519
static void FileOpen( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
520
{
521
    struct stat         stat_info;
522 523 524
    int                 i_stat;

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

526 527 528
    /* 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) )
529
    {
530 531 532 533 534 535 536 537
        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 );
538
        }
539
        else if( ( i_size > 5 )
540 541 542 543 544
                 && !strncasecmp( psz_name, "file:", 5 ) )
        {
            /* get rid of the 'file:' stuff and try again */
            psz_name += 5;
            i_stat = stat( psz_name, &stat_info );
545
        }
546

547
        if( i_stat == (-1) )
548 549 550 551 552 553
        {
            intf_ErrMsg( "input error: cannot stat() file `%s' (%s)",
                         psz_name, strerror(errno));
            p_input->b_error = 1;
            return;
        }
554 555 556 557 558 559 560 561
    }

    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)
562
         || S_ISBLK(stat_info.st_mode) )
563 564
    {
        p_input->stream.b_seekable = 1;
565
        p_input->stream.p_selected_area->i_size = stat_info.st_size;
566
    }
567
    else if( S_ISFIFO(stat_info.st_mode)
568
#if !defined( SYS_BEOS ) && !defined( WIN32 )
569 570 571
             || S_ISSOCK(stat_info.st_mode)
#endif
             )
572
    {
573
        p_input->stream.b_seekable = 0;
574
        p_input->stream.p_selected_area->i_size = 0;
Benoit Steiner's avatar
Benoit Steiner committed
575 576 577
    }
    else
    {
578
        vlc_mutex_unlock( &p_input->stream.stream_lock );
579
        intf_ErrMsg( "input error: unknown file type for `%s'",
580
                     psz_name );
581 582 583
        p_input->b_error = 1;
        return;
    }
584

585
    p_input->stream.p_selected_area->i_tell = 0;
586 587
    vlc_mutex_unlock( &p_input->stream.stream_lock );

588
    intf_WarnMsg( 1, "input: opening file `%s'", p_input->p_source );
589 590 591
#if defined( WIN32 )
    if( (p_input->i_handle = open( psz_name, O_BINARY ) ) == (-1) )
#else
592
    if( (p_input->i_handle = open( psz_name,
593
                                   /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
594
#endif
595
    {
596
        intf_ErrMsg( "input error: cannot open file (%s)", strerror(errno) );
597 598
        p_input->b_error = 1;
        return;
Michel Kaempf's avatar
Michel Kaempf committed
599 600 601
    }

}
Stéphane Borel's avatar
Stéphane Borel committed
602 603

/*****************************************************************************
604
 * FileClose : close a file descriptor
Stéphane Borel's avatar
Stéphane Borel committed
605
 *****************************************************************************/
606
static void FileClose( input_thread_t * p_input )
Stéphane Borel's avatar
Stéphane Borel committed
607
{
608
    intf_WarnMsg( 1, "input: closing file `%s'", p_input->p_source );
609

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

612
    return;
Stéphane Borel's avatar
Stéphane Borel committed
613
}
614

615
#if !defined( SYS_BEOS ) && !defined( SYS_NTO )
616
/*****************************************************************************
617
 * NetworkOpen : open a network socket 
618
 *****************************************************************************/
619
static void NetworkOpen( input_thread_t * p_input )
620
{
621
    char                *psz_server = NULL;
622
    char                *psz_broadcast = NULL;
623
    int                 i_port = 0;
624 625
    int                 i_opt;
    struct sockaddr_in  sock;
626 627
#ifdef WIN32
    WSADATA Data;
628 629 630 631 632 633
    int i_err;
#endif
    
#ifdef WIN32
    /* WinSock Library Init. */
    i_err = WSAStartup( MAKEWORD( 1, 1 ), &Data );
634 635 636 637 638 639 640

    if( i_err )
    {
        intf_ErrMsg( "input: can't initiate WinSocks, error %i", i_err );
        return ;
    }
#endif
641 642
    
    /* Get the remote server */
643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676
    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++;

677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701
                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 );
                }
702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718
            }
        }
        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 )
719
    {
720
        i_port = main_GetIntVariable( INPUT_PORT_VAR, INPUT_PORT_DEFAULT );
721
    }
722 723 724 725

    if( psz_broadcast == NULL )
    {
        /* Are we broadcasting ? */
726 727 728 729 730 731 732 733 734 735
        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; 
        }
736 737 738 739 740
    }

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

741 742 743 744 745
    /* 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 )
    {
746
        intf_ErrMsg("input error: can't create socket : %s", strerror(errno));
747 748 749 750 751
        p_input->b_error = 1;
        return;
    }

    /* We may want to reuse an already used socket */
752
    i_opt = 1;
753
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_REUSEADDR,
754
                    (void*) &i_opt, sizeof( i_opt ) ) == -1 )
755
    {
756 757
        intf_ErrMsg( "input error: can't configure socket (SO_REUSEADDR: %s)",
                     strerror(errno));
758 759 760 761 762 763 764
        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 */
765 766
    i_opt = 0x80000;
    if( setsockopt( p_input->i_handle, SOL_SOCKET, SO_RCVBUF,
767
                    (void*) &i_opt, sizeof( i_opt ) ) == -1 )
768
    {
769 770
        intf_ErrMsg( "input error: can't configure socket (SO_RCVBUF: %s)", 
                     strerror(errno));
771 772 773 774 775 776
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Build the local socket */
777
    if ( network_BuildLocalAddr( &sock, i_port, psz_broadcast ) == -1 )
778
    {
779
        intf_ErrMsg( "input error: can't build local address" );
780 781 782 783
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }
784 785 786 787 788 789 790

#if defined( WIN32 )
    if ( psz_broadcast != NULL )
    {
        sock.sin_addr.s_addr = INADDR_ANY;
    }
#endif
791 792
    
    /* Bind it */
793 794
    if( bind( p_input->i_handle, (struct sockaddr *)&sock, 
              sizeof( sock ) ) < 0 )
795
    {
796
        intf_ErrMsg("input error: can't bind socket (%s)", strerror(errno));
797 798 799 800 801 802
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* Build socket for remote connection */
803
    if ( network_BuildRemoteAddr( &sock, psz_server ) == -1 )
804
    {
805
        intf_ErrMsg( "input error: can't build remote address" );
806 807 808 809 810 811
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* And connect it ... should we really connect ? */
812 813
    if( connect( p_input->i_handle, (struct sockaddr *) &sock,
                 sizeof( sock ) ) == (-1) )
814
    {
815
        intf_ErrMsg( "input error: can't connect socket, %s", 
816
                     strerror(errno) );
817 818 819 820 821 822 823
        close( p_input->i_handle );
        p_input->b_error = 1;
        return;
    }

    /* We can't pace control, but FIXME : bug in meuuh's code to sync PCR
     * with the server. */
824
    p_input->stream.b_pace_control = 0;
825
    p_input->stream.b_seekable = 0;
826 827

    intf_WarnMsg( 3, "input: successfully opened network mode" );
828 829 830 831 832
    
    return;
}

/*****************************************************************************
833
 * NetworkClose : close a network socket
834
 *****************************************************************************/
835
static void NetworkClose( input_thread_t * p_input )
836 837
{
    close( p_input->i_handle );
838

839 840 841
#ifdef WIN32 
    WSACleanup();
#endif
842

843
}
844
#endif
845