input.c 13.8 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.59 2000/12/19 19:08:51 massiot Exp $
8
 *
9
 * Authors: 
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 35 36 37
#include <stdlib.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>
#include <string.h>
#include <errno.h>
Michel Kaempf's avatar
Michel Kaempf committed
38

39 40 41 42
#ifdef STATS
#   include <sys/times.h>
#endif

Michel Kaempf's avatar
Michel Kaempf committed
43
#include "config.h"
44 45
#include "common.h"
#include "threads.h"
Michel Kaempf's avatar
Michel Kaempf committed
46
#include "mtime.h"
47

48
#include "intf_msg.h"
49

50 51 52
#include "stream_control.h"
#include "input_ext-intf.h"
#include "input_ext-dec.h"
Michel Lespinasse's avatar
Yop,  
Michel Lespinasse committed
53

54
#include "input.h"
Michel Kaempf's avatar
Michel Kaempf committed
55

56
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
57
 * Local prototypes
58
 *****************************************************************************/
59
static void RunThread   ( input_thread_t *p_input );
60
static void InitThread  ( input_thread_t *p_input );
61 62
static void ErrorThread ( input_thread_t *p_input );
static void EndThread   ( input_thread_t *p_input );
63 64
static void NetworkOpen ( input_thread_t *p_input );
static void FileOpen    ( input_thread_t *p_input );
Michel Kaempf's avatar
Michel Kaempf committed
65

66
/*****************************************************************************
67
 * input_CreateThread: creates a new input thread
68
 *****************************************************************************
69 70 71 72
 * 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.
73
 *****************************************************************************/
74
input_thread_t *input_CreateThread ( input_config_t * p_config, int *pi_status )
Michel Kaempf's avatar
Michel Kaempf committed
75
{
76 77
    input_thread_t *    p_input;                        /* thread descriptor */
    int                 i_status;                           /* thread status */
78
    int                 i;
79

80 81 82 83
    /* Allocate descriptor */
    intf_DbgMsg("\n");
    p_input = (input_thread_t *)malloc( sizeof(input_thread_t) );
    if( p_input == NULL )
Michel Kaempf's avatar
Michel Kaempf committed
84
    {
85 86
        intf_ErrMsg("error: %s\n", strerror(errno));
        free( p_config );
Michel Kaempf's avatar
Michel Kaempf committed
87 88
        return( NULL );
    }
89 90 91 92

    /* Initialize thread properties */
    p_input->b_die              = 0;
    p_input->b_error            = 0;
93
    /* I have never understood that stuff --Meuuh */
94 95
    p_input->pi_status          = (pi_status != NULL) ? pi_status : &i_status;
    *p_input->pi_status         = THREAD_CREATE;
96
    p_input->p_config = p_config;
Michel Kaempf's avatar
Michel Kaempf committed
97

98
    /* Initialize stream description */
99
    for( i = 0; i < INPUT_MAX_SELECTED_ES; i++ )
Michel Kaempf's avatar
Michel Kaempf committed
100
    {
101
        p_input->pp_selected_es[i] = NULL;
Michel Kaempf's avatar
Michel Kaempf committed
102
    }
103
    for( i= 0; i < INPUT_MAX_ES; i++ )
Michel Kaempf's avatar
Michel Kaempf committed
104
    {
105
        p_input->p_es[i].i_id = EMPTY_ID;
Michel Kaempf's avatar
Michel Kaempf committed
106
    }
107
    p_input->stream.i_pgrm_number = 0;
Michel Kaempf's avatar
Michel Kaempf committed
108

109 110 111 112 113 114 115
    /* Initialize stream control properties. */
    p_input->stream.control.i_status = PLAYING_S;
    p_input->stream.control.i_rate = DEFAULT_RATE;
    p_input->stream.control.i_ref_sysdate = 0;
    p_input->stream.control.i_ref_clock = 0;
    p_input->stream.control.b_mute = 0;
    p_input->stream.control.b_bw = 0;
Michel Kaempf's avatar
Michel Kaempf committed
116 117

    /* Create thread and set locks. */
118 119 120 121
    vlc_mutex_init( &p_input->stream.stream_lock );
    vlc_mutex_init( &p_input->stream.control.control_lock );
    if( vlc_thread_create( &p_input->thread_id, "input", (void *) RunThread,
                           (void *) p_input ) )
Michel Kaempf's avatar
Michel Kaempf committed
122
    {
123
        intf_ErrMsg("error: %s\n", strerror(errno) );
Michel Kaempf's avatar
Michel Kaempf committed
124
        free( p_input );
125
        free( p_config );
Michel Kaempf's avatar
Michel Kaempf committed
126 127
        return( NULL );
    }
128

129 130 131 132
    /* If status is NULL, wait until the thread is created */
    if( pi_status == NULL )
    {
        do
133
        {
134
            msleep( THREAD_SLEEP );
135
        } while( (i_status != THREAD_READY) && (i_status != THREAD_ERROR)
136 137 138
                && (i_status != THREAD_FATAL) );
        if( i_status != THREAD_READY )
        {
139 140
            return( NULL );
        }
141
    }
Michel Kaempf's avatar
Michel Kaempf committed
142 143 144
    return( p_input );
}

145
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
146
 * input_DestroyThread: mark an input thread as zombie
147
 *****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
148
 * This function should not return until the thread is effectively cancelled.
149
 *****************************************************************************/
150
void input_DestroyThread( input_thread_t *p_input, int *pi_status )
Michel Kaempf's avatar
Michel Kaempf committed
151
{
152
    int         i_status;                                   /* thread status */
153 154 155

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

158 159
    /* Request thread destruction */
    p_input->b_die = 1;
Michel Kaempf's avatar
Michel Kaempf committed
160

161 162 163 164 165 166
    /* If status is NULL, wait until thread has been destroyed */
    if( pi_status == NULL )
    {
        do
        {
            msleep( THREAD_SLEEP );
167 168
        } while ( (i_status != THREAD_OVER) && (i_status != THREAD_ERROR)
                  && (i_status != THREAD_FATAL) );
169
    }
Michel Kaempf's avatar
Michel Kaempf committed
170 171
}

172
/*****************************************************************************
173
 * RunThread: main thread loop
174
 *****************************************************************************
175
 * Thread in charge of processing the network packets and demultiplexing.
176
 *****************************************************************************/
177
static void RunThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
178
{
179
    data_packet_t *      pp_packets[INPUT_READ_ONCE];
Michel Kaempf's avatar
Michel Kaempf committed
180

181
    InitThread( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
182

183 184 185 186
    while( !p_input->b_die && !p_input->b_error )
    {
#ifdef STATS
        p_input->c_loops++;
Michel Kaempf's avatar
Michel Kaempf committed
187 188
#endif

189 190 191
        vlc_mutex_lock( &p_input->stream.control.control_lock );
        if( p_input->stream.control.i_status == BACKWARD_S
             && p_input->p_plugin->pf_rewind != NULL )
192
        {
193 194
            p_input->p_plugin->pf_rewind( p_input );
            /* FIXME: probably don't do it every loop, but when ? */
Michel Kaempf's avatar
Michel Kaempf committed
195
        }
196
        vlc_mutex_unlock( &p_input->stream.control.control_lock );
197

198 199
        p_input->p_plugin->pf_read( p_input, pp_packets );
        if( !p_input->b_error )
200
        {
201 202 203
            int     i;

            for( i = 0; i < INPUT_READ_ONCE && pp_packets[i] != NULL; i++ )
204
            {
205
                p_input->p_plugin->pf_demux( p_input, pp_packets[i] );
206
            }
207 208 209
        }
    }

210 211 212 213
    if( p_input->b_error )
    {
        ErrorThread( p_input );
    }
214

215 216
    EndThread( p_input );
    intf_DbgMsg("Thread end");
217 218
}

219
/*****************************************************************************
220
 * InitThread: init the input thread
221
 *****************************************************************************/
222 223
input_capabilities_t * PSKludge( void );
static void InitThread( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
224
{
225 226 227
    /* Initialize default settings for spawned decoders */
    p_input->p_default_aout     = p_input->p_config->p_default_aout;
    p_input->p_default_vout     = p_input->p_config->p_default_vout;
Michel Kaempf's avatar
Michel Kaempf committed
228 229

#ifdef STATS
230 231 232 233 234 235
    /* 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
236
#endif
237

238 239 240 241 242 243 244 245
    /* Use the appropriate input method */
    switch( p_input->p_config->i_method )
    {
    case INPUT_METHOD_FILE:                                  /* file methods */
        FileOpen( p_input );
        break;
    case INPUT_METHOD_VLAN_BCAST:                     /* vlan network method */
/*        if( !p_main->b_vlans )
Michel Kaempf's avatar
Michel Kaempf committed
246
        {
247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262
            intf_ErrMsg("error: vlans are not activated\n");
            free( p_input );
            return( NULL );
        } */ /* la-lala */
        /* ... pass through */
    case INPUT_METHOD_UCAST:                              /* network methods */
    case INPUT_METHOD_MCAST:
    case INPUT_METHOD_BCAST:
        NetworkOpen( p_input );
        break;
#ifdef DEBUG
    default:
        intf_ErrMsg("Unknow input method");
        free( p_input->p_config );
        p_input->b_error = 1;
        break;
263
#endif
Michel Kaempf's avatar
Michel Kaempf committed
264
    }
265 266 267 268 269 270 271 272

    free( p_input->p_config );

    /* Probe plugin (FIXME: load plugins before & write this) */
    p_input->p_plugin = PSKludge();
    p_input->p_plugin->pf_init( p_input );

    *p_input->pi_status = THREAD_READY;
Michel Kaempf's avatar
Michel Kaempf committed
273 274
}

275
/*****************************************************************************
276
 * ErrorThread: RunThread() error loop
277
 *****************************************************************************
278
 * This function is called when an error occured during thread main's loop.
279
 *****************************************************************************/
280
static void ErrorThread( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
281
{
282
    while( !p_input->b_die )
Michel Kaempf's avatar
Michel Kaempf committed
283
    {
284 285
        /* Sleep a while */
        msleep( INPUT_IDLE_SLEEP );
Michel Kaempf's avatar
Michel Kaempf committed
286 287 288
    }
}

289
/*****************************************************************************
290
 * EndThread: end the input thread
291
 *****************************************************************************/
292
static void EndThread( input_thread_t * p_input )
293
{
294 295
    int *       pi_status;                                  /* thread status */
    int         i_es_loop;                                       /* es index */
296

297 298 299
    /* Store status */
    pi_status = p_input->pi_status;
    *pi_status = THREAD_END;
300

301 302 303 304 305 306 307 308 309 310
#ifdef STATS
    {
        struct tms cpu_usage;
        times( &cpu_usage );

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

311 312 313 314 315
    /* Destroy all decoder threads */
    for( i_es_loop = 0;
         (i_es_loop < INPUT_MAX_ES)
            && (p_input->pp_selected_es[i_es_loop] != NULL) ;
         i_es_loop++ )
316
    {
317 318 319 320 321
        p_input->pp_selected_es[i_es_loop]->p_decoder_fifo->b_die = 1;
        /* Make sure the thread leaves the GetByte() function */
        vlc_mutex_lock( &p_input->pp_selected_es[i_es_loop]->p_decoder_fifo->data_lock);
        vlc_cond_signal( &p_input->pp_selected_es[i_es_loop]->p_decoder_fifo->data_wait );
        vlc_mutex_unlock( &p_input->pp_selected_es[i_es_loop]->p_decoder_fifo->data_lock );
322

323 324 325
        /* Waiting for the thread to exit */
        vlc_thread_join( p_input->pp_selected_es[i_es_loop]->thread_id );
        free( p_input->pp_selected_es[i_es_loop]->p_decoder_fifo );
326 327
    }

328
    /* Free demultiplexer's data */
329

330 331
    /* Update status */
    *pi_status = THREAD_OVER;
332
}
333

334
/*****************************************************************************
335
 * NetworkOpen : open a network socket descriptor
336
 *****************************************************************************/
337
static void NetworkOpen( input_thread_t * p_input )
338
{
339
    /* straight copy & paste of input_network.c of input-I */
340

341 342 343 344
    /* We cannot rewind nor lseek() */
    p_input->stream.b_seekable = 0;
    /* We cannot control the pace */
    p_input->stream.b_pace_control = 0;
345 346
}

347
/*****************************************************************************
348
 * FileOpen : open a file descriptor
349
 *****************************************************************************/
350
static void FileOpen( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
351
{
352
    struct stat         stat_info;
Michel Kaempf's avatar
Michel Kaempf committed
353

354
#define p_config    p_input->p_config
Michel Kaempf's avatar
Michel Kaempf committed
355

356
    if( !strncmp( p_config->p_source, "-", 1 ) )
357
    {
358 359 360 361 362
        /* stdin */
        p_input->i_handle = 0;
        
        vlc_mutex_lock( &p_input->stream.stream_lock );
        p_input->stream.b_pace_control = 1;
363 364
        p_input->stream.b_seekable = 0;
        p_input->stream.i_size = 0;
365 366
        p_input->stream.i_tell = 0;
        vlc_mutex_unlock( &p_input->stream.stream_lock );
Benoit Steiner's avatar
Benoit Steiner committed
367 368 369
    }
    else
    {
370 371 372 373 374 375 376
        if( stat( p_config->p_source, &stat_info ) == (-1) )
        {
            intf_ErrMsg("Cannot stat() file %s (%s)", p_config->p_source,
                        strerror(errno));
            p_input->b_error = 1;
            return;
        }
Michel Kaempf's avatar
Michel Kaempf committed
377

378
        vlc_mutex_lock( &p_input->stream.stream_lock );
Michel Kaempf's avatar
Michel Kaempf committed
379

380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412
        /* 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)
             || S_ISBLK(stat_info.st_mode) )
        {
            p_input->stream.b_seekable = 1;
            p_input->stream.i_size = stat_info.st_size;
        }
        else if( S_ISFIFO(stat_info.st_mode) || S_ISSOCK(stat_info.st_mode) )
        {
            p_input->stream.b_seekable = 0;
            p_input->stream.i_size = 0;
        }
        else
        {
            vlc_mutex_unlock( &p_input->stream.stream_lock );
            intf_ErrMsg("Unknown file type");
            p_input->b_error = 1;
            return;
        }

        p_input->stream.i_tell = 0;
        vlc_mutex_unlock( &p_input->stream.stream_lock );

        intf_Msg( "Opening file %s", p_config->p_source );
        if( (p_input->i_handle = open( p_config->p_source,
                                       /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
        {
            intf_ErrMsg("Cannot open file (%s)", strerror(errno));
            p_input->b_error = 1;
            return;
        }
Michel Kaempf's avatar
Michel Kaempf committed
413 414
    }

415
#undef p_config
Michel Kaempf's avatar
Michel Kaempf committed
416
}