git.sesse.net Git - vlc/blob - modules/access/dvb/access.c

   1 /*****************************************************************************
   2  * access.c: DVB card input v4l2 only
   3  *****************************************************************************
   4  * Copyright (C) 1998-2003 VideoLAN
   5  *
   6  * Authors: Johan Bilien <jobi@via.ecp.fr>
   7  *          Jean-Paul Saman <saman@natlab.research.philips.com>
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  22  *****************************************************************************/
  23
  24
  25 /*****************************************************************************
  26  * Preamble
  27  *****************************************************************************/
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30
  31 #include <vlc/vlc.h>
  32 #include <vlc/input.h>
  33
  34 #include "../../demux/mpeg/system.h"
  35
  36 #ifdef HAVE_UNISTD_H
  37 #   include <unistd.h>
  38 #endif
  39
  40 #include <fcntl.h>
  41 #include <sys/types.h>
  42
  43 #ifdef HAVE_ERRNO_H
  44 #    include <string.h>
  45 #    include <errno.h>
  46 #endif
  47
  48 #ifdef STRNCASECMP_IN_STRINGS_H
  49 #   include <strings.h>
  50 #endif
  51
  52 /* DVB Card Drivers */
  53 #include <linux/dvb/dmx.h>
  54 #include <linux/dvb/frontend.h>
  55
  56 #include "dvb.h"
  57
  58 #define SATELLITE_READ_ONCE 3
  59
  60 /*****************************************************************************
  61  * Local prototypes
  62  *****************************************************************************/
  63 static ssize_t SatelliteRead( input_thread_t * p_input, byte_t * p_buffer,
  64                               size_t i_len);
  65 static int     SatelliteSetArea    ( input_thread_t *, input_area_t * );
  66 static int     SatelliteSetProgram ( input_thread_t *, pgrm_descriptor_t * );
  67 static void    SatelliteSeek       ( input_thread_t *, off_t );
  68
  69 /*****************************************************************************
  70  * Open: open the frontend device
  71  *****************************************************************************/
  72 int E_(Open) ( vlc_object_t *p_this )
  73 {
  74     struct dvb_frontend_info frontend_info;
  75     struct dvb_frontend_parameters fep;
  76     input_thread_t *    p_input = (input_thread_t *)p_this;
  77     input_socket_t *    p_satellite;
  78     char *              psz_parser;
  79     char *              psz_next;
  80     int                 i_fd = 0;
  81     unsigned int        u_adapter = 1;
  82     unsigned int        u_device = 0;
  83     unsigned int        u_freq = 0;
  84     unsigned int        u_srate = 0;
  85     unsigned int        u_lnb_lof1;
  86     unsigned int        u_lnb_lof2;
  87     unsigned int        u_lnb_slof;
  88     int                 i_bandwidth = 0;
  89     int                 i_modulation = 0;
  90     int                 i_guard = 0;
  91     int                 i_transmission = 0;
  92     int                 i_hierarchy = 0;
  93     vlc_bool_t          b_polarisation = 0;
  94     int                 i_fec = 0;
  95     int                 i_code_rate_HP = 0;
  96     int                 i_code_rate_LP = 0;
  97     vlc_bool_t          b_diseqc;
  98     vlc_bool_t          b_probe;
  99     char                dvr[] = DVR;
 100     char                frontend[] = FRONTEND;
 101     int                 i_len = 0;
 102
 103     /* parse the options passed in command line : */
 104     psz_parser = strdup( p_input->psz_name );
 105
 106     if( !psz_parser )
 107     {
 108         return( -1 );
 109     }
 110
 111     // Get adapter and device number to use for this dvb card
 112     u_adapter = config_GetInt( p_input, "adapter" );
 113     u_device  = config_GetInt( p_input, "device" );
 114
 115     /* Determine frontend device information and capabilities */
 116     b_probe = config_GetInt( p_input, "probe" );
 117     if (b_probe)
 118     {
 119         if ( ioctl_InfoFrontend(p_input, &frontend_info, u_adapter, u_device) < 0 )
 120         {
 121             msg_Err( p_input, "(access) cannot determine frontend info" );
 122             return -1;
 123         }
 124     }
 125     else /* no frontend probing is done so use default border values. */
 126     {
 127         msg_Dbg( p_input, "using default bvalues for frontend info" );
 128         i_len = sizeof(FRONTEND);
 129         if (snprintf(frontend, sizeof(FRONTEND), FRONTEND, u_adapter, u_device) >= i_len)
 130         {
 131             msg_Err( p_input, "snprintf() truncated string for FRONTEND" );
 132             frontend[sizeof(FRONTEND)] = '\0';
 133         }
 134         strncpy(frontend_info.name, frontend, 128);
 135
 136         msg_Dbg(p_input, "method of access is %s", p_input->psz_access);
 137
 138         frontend_info.type = FE_QPSK;
 139         if (strncmp( p_input->psz_access, "qpsk",4 ) ==0)
 140             frontend_info.type = FE_QPSK;
 141         else if (strncmp( p_input->psz_access, "cable",5 ) ==0)
 142             frontend_info.type = FE_QAM;
 143         else if (strncmp( p_input->psz_access, "terrestrial",11) ==0)
 144             frontend_info.type = FE_OFDM;
 145
 146         frontend_info.frequency_max = 12999 * 1000;
 147         frontend_info.frequency_min = 9750 * 1000;
 148         frontend_info.symbol_rate_max = 30000;
 149         frontend_info.symbol_rate_min = 1000;
 150     }
 151
 152     /* Register Callback functions */
 153     p_input->pf_read = SatelliteRead;
 154     p_input->pf_set_program = SatelliteSetProgram;
 155     p_input->pf_set_area = SatelliteSetArea;
 156     p_input->pf_seek = SatelliteSeek;
 157
 158     u_freq = (unsigned int)strtol( psz_parser, &psz_next, 10 );
 159     if( *psz_next )
 160     {
 161         psz_parser = psz_next + 1;
 162         b_polarisation = (vlc_bool_t)strtol( psz_parser, &psz_next, 10 );
 163         if( *psz_next )
 164         {
 165             psz_parser = psz_next + 1;
 166             i_fec = (int)strtol( psz_parser, &psz_next, 10 );
 167             if( *psz_next )
 168             {
 169                 psz_parser = psz_next + 1;
 170                 u_srate = (unsigned int)strtol( psz_parser, &psz_next, 10 );
 171             }
 172         }
 173     }
 174
 175     /* Validating input values */
 176     u_freq *= 1000;
 177     if ( ((u_freq) > frontend_info.frequency_max) ||
 178          ((u_freq) < frontend_info.frequency_min) )
 179     {
 180         msg_Warn( p_input, "invalid frequency %d (kHz), using default one", u_freq );
 181         u_freq = config_GetInt( p_input, "frequency" );
 182         if ( ((u_freq) > frontend_info.frequency_max) ||
 183              ((u_freq) < frontend_info.frequency_min) )
 184         {
 185             msg_Err( p_input, "invalid default frequency" );
 186             return -1;
 187         }
 188     }
 189
 190     if ( ((u_srate) > frontend_info.symbol_rate_max) ||
 191          ((u_srate) < frontend_info.symbol_rate_min) )
 192     {
 193         msg_Warn( p_input, "invalid symbol rate, using default one" );
 194         u_srate = config_GetInt( p_input, "symbol-rate" );
 195         if ( ((u_srate) > frontend_info.symbol_rate_max) ||
 196              ((u_srate) < frontend_info.symbol_rate_min) )
 197         {
 198             msg_Err( p_input, "invalid default symbol rate" );
 199             return -1;
 200         }
 201     }
 202
 203     if( b_polarisation && (b_polarisation != 1) )
 204     {
 205         msg_Warn( p_input, "invalid polarization, using default one" );
 206         b_polarisation = config_GetInt( p_input, "polarization" );
 207         if( b_polarisation && b_polarisation != 1 )
 208         {
 209             msg_Err( p_input, "invalid default polarization" );
 210             return -1;
 211         }
 212     }
 213
 214     if( (i_fec > 9) || (i_fec < 1) )
 215     {
 216         msg_Warn( p_input, "invalid FEC, using default one" );
 217         i_fec = config_GetInt( p_input, "fec" );
 218         if( (i_fec > 9) || (i_fec < 1) )
 219         {
 220             msg_Err( p_input, "invalid default FEC" );
 221             return -1;
 222         }
 223     }
 224
 225     /* Get antenna configuration options */
 226     b_diseqc = config_GetInt( p_input, "diseqc" );
 227     u_lnb_lof1 = config_GetInt( p_input, "lnb-lof1" ) * 1000;
 228     u_lnb_lof2 = config_GetInt( p_input, "lnb-lof2" ) * 1000;
 229     u_lnb_slof = config_GetInt( p_input, "lnb-slof" ) * 1000;
 230
 231     /* Setting frontend parameters for tuning the hardware */
 232     switch( frontend_info.type )
 233     {
 234         /* DVB-S: satellite and budget cards (nova) */
 235         case FE_QPSK:
 236             fep.frequency = u_freq;
 237             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
 238             fep.u.qpsk.symbol_rate = u_srate * 1000;
 239             fep.u.qpsk.fec_inner = dvb_DecodeFEC(p_input, i_fec);
 240             msg_Dbg( p_input, "satellite (QPSK) frontend found on %s", frontend_info.name );
 241             break;
 242
 243         /* DVB-C */
 244         case FE_QAM:
 245             i_modulation  = config_GetInt(p_input, "modulation");
 246
 247             fep.frequency = u_freq;
 248             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
 249             fep.u.qam.symbol_rate = u_srate * 1000;
 250             fep.u.qam.fec_inner = dvb_DecodeFEC(p_input, i_fec);
 251             fep.u.qam.modulation = dvb_DecodeModulation(p_input, i_modulation);
 252             msg_Dbg( p_input, "cable (QAM) frontend found on %s", frontend_info.name );
 253             break;
 254
 255         /* DVB-T */
 256         case FE_OFDM:
 257             i_bandwidth = config_GetInt( p_input, "bandwidth");
 258             i_code_rate_HP = config_GetInt(p_input, "code-rate-hp");
 259             i_code_rate_LP = config_GetInt(p_input, "code-rate-lp");
 260             i_modulation  = config_GetInt(p_input, "modulation");
 261             i_transmission = config_GetInt(p_input, "transmission");
 262             i_guard = config_GetInt(p_input, "guard");
 263             i_hierarchy = config_GetInt(p_input, "hierarchy");
 264
 265             fep.frequency = u_freq;
 266             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
 267             fep.u.ofdm.bandwidth = dvb_DecodeBandwidth(p_input, i_bandwidth);
 268             fep.u.ofdm.code_rate_HP = dvb_DecodeFEC(p_input, i_code_rate_HP);
 269             fep.u.ofdm.code_rate_LP = dvb_DecodeFEC(p_input, i_code_rate_LP);
 270             fep.u.ofdm.constellation = dvb_DecodeModulation(p_input, i_modulation);
 271             fep.u.ofdm.transmission_mode = dvb_DecodeTransmission(p_input, i_transmission);
 272             fep.u.ofdm.guard_interval = dvb_DecodeGuardInterval(p_input, i_guard);
 273             fep.u.ofdm.hierarchy_information = dvb_DecodeHierarchy(p_input, i_hierarchy);
 274             msg_Dbg( p_input, "terrestrial (OFDM) frontend found on %s", frontend_info.name );
 275             break;
 276
 277         default:
 278             msg_Err( p_input, "Could not determine frontend type on %s", frontend_info.name );
 279             return -1;
 280     }
 281
 282     /* Initialise structure */
 283     p_satellite = malloc( sizeof( input_socket_t ) );
 284
 285     if( p_satellite == NULL )
 286     {
 287         msg_Err( p_input, "out of memory" );
 288         return -1;
 289     }
 290
 291     p_input->p_access_data = (void *)p_satellite;
 292
 293     /* Open the DVR device */
 294     i_len = sizeof(DVR);
 295     if (snprintf(dvr, sizeof(DVR), DVR, u_adapter, u_device) >= i_len)
 296     {
 297         msg_Err( p_input, "snprintf() truncated string for DVR" );
 298         dvr[sizeof(DVR)] = '\0';
 299     }
 300     msg_Dbg( p_input, "opening DVR device '%s'", dvr );
 301
 302     if( (p_satellite->i_handle = open( dvr,
 303                                    /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
 304     {
 305 #   ifdef HAVE_ERRNO_H
 306         msg_Warn( p_input, "cannot open `%s' (%s)", dvr, strerror(errno) );
 307 #   else
 308         msg_Warn( p_input, "cannot open `%s'", dvr );
 309 #   endif
 310         free( p_satellite );
 311         return -1;
 312     }
 313
 314     /* Initialize the Satellite Card */
 315     switch (ioctl_SetFrontend (p_input, fep, b_polarisation,
 316                                u_lnb_lof1, u_lnb_lof2, u_lnb_slof,
 317                                u_adapter, u_device ))
 318     {
 319         case -2:
 320             msg_Err( p_input, "frontend returned an unexpected event" );
 321             close( p_satellite->i_handle );
 322             free( p_satellite );
 323             return -1;
 324         case -3:
 325             msg_Err( p_input, "frontend returned no event" );
 326             close( p_satellite->i_handle );
 327             free( p_satellite );
 328             return -1;
 329         case -4:
 330             msg_Err( p_input, "frontend: timeout when polling for event" );
 331             close( p_satellite->i_handle );
 332             free( p_satellite );
 333             return -1;
 334         case -5:
 335             msg_Err( p_input, "an error occured when polling frontend device" );
 336             close( p_satellite->i_handle );
 337             free( p_satellite );
 338             return -1;
 339         case -1:
 340             msg_Err( p_input, "frontend returned a failure event" );
 341             close( p_satellite->i_handle );
 342             free( p_satellite );
 343             return -1;
 344         default:
 345             break;
 346     }
 347
 348     msg_Dbg( p_input, "setting filter on PAT" );
 349
 350     if ( ioctl_SetDMXFilter(p_input, 0, &i_fd, 3, u_adapter, u_device ) < 0 )
 351     {
 352 #   ifdef HAVE_ERRNO_H
 353         msg_Err( p_input, "an error occured when setting filter on PAT (%s)", strerror(errno) );
 354 #   else
 355         msg_Err( p_input, "an error occured when setting filter on PAT" );
 356 #   endif
 357         close( p_satellite->i_handle );
 358         free( p_satellite );
 359         return -1;
 360     }
 361
 362     if( input_InitStream( p_input, sizeof( stream_ts_data_t ) ) == -1 )
 363     {
 364         msg_Err( p_input, "could not initialize stream structure" );
 365         close( p_satellite->i_handle );
 366         free( p_satellite );
 367         return( -1 );
 368     }
 369
 370     vlc_mutex_lock( &p_input->stream.stream_lock );
 371
 372     p_input->stream.b_pace_control = 1;
 373     p_input->stream.b_seekable = 0;
 374     p_input->stream.p_selected_area->i_tell = 0;
 375
 376     vlc_mutex_unlock( &p_input->stream.stream_lock );
 377
 378     p_input->i_mtu = SATELLITE_READ_ONCE * TS_PACKET_SIZE;
 379     p_input->stream.i_method = INPUT_METHOD_SATELLITE;
 380
 381     return 0;
 382 }
 383
 384 /*****************************************************************************
 385  * Close : Close the device
 386  *****************************************************************************/
 387 void E_(Close) ( vlc_object_t *p_this )
 388 {
 389     input_thread_t *    p_input = (input_thread_t *)p_this;
 390     input_socket_t *    p_satellite;
 391     unsigned int        i_es_index;
 392
 393     if ( p_input->stream.p_selected_program )
 394     {
 395         for ( i_es_index = 1 ;
 396                 i_es_index < p_input->stream.p_selected_program->i_es_number;
 397                 i_es_index ++ )
 398         {
 399 #define p_es p_input->stream.p_selected_program->pp_es[i_es_index]
 400             if ( p_es->p_decoder_fifo )
 401             {
 402                 ioctl_UnsetDMXFilter(p_input, p_es->i_demux_fd );
 403             }
 404 #undef p_es
 405         }
 406     }
 407
 408     p_satellite = (input_socket_t *)p_input;
 409     close( p_satellite->i_handle );
 410 }
 411
 412 /*****************************************************************************
 413  * SatelliteRead: reads data from the satellite card
 414  *****************************************************************************/
 415 static ssize_t SatelliteRead( input_thread_t * p_input, byte_t * p_buffer,
 416                               size_t i_len )
 417 {
 418     input_socket_t * p_access_data = (input_socket_t *)p_input->p_access_data;
 419     ssize_t i_ret;
 420     unsigned int u_adapter = 1;
 421     unsigned int u_device = 0;
 422     unsigned int i;
 423
 424     // Get adapter and device number to use for this dvb card
 425     u_adapter = config_GetInt( p_input, "adapter" );
 426     u_device  = config_GetInt( p_input, "device" );
 427
 428     /* if not set, set filters to the PMTs */
 429     for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
 430     {
 431         if ( p_input->stream.pp_programs[i]->pp_es[0]->i_demux_fd == 0 )
 432         {
 433             ioctl_SetDMXFilter(p_input, p_input->stream.pp_programs[i]->pp_es[0]->i_id,
 434                        &p_input->stream.pp_programs[i]->pp_es[0]->i_demux_fd,
 435                        3, u_adapter, u_device );
 436         }
 437     }
 438
 439     i_ret = read( p_access_data->i_handle, p_buffer, i_len );
 440
 441     if( i_ret < 0 )
 442     {
 443 #   ifdef HAVE_ERRNO_H
 444         msg_Err( p_input, "read failed (%s)", strerror(errno) );
 445 #   else
 446         msg_Err( p_input, "read failed" );
 447 #   endif
 448     }
 449
 450     return i_ret;
 451 }
 452
 453 /*****************************************************************************
 454  * SatelliteSetArea : Does nothing
 455  *****************************************************************************/
 456 static int SatelliteSetArea( input_thread_t * p_input, input_area_t * p_area )
 457 {
 458     return -1;
 459 }
 460
 461 /*****************************************************************************
 462  * SatelliteSetProgram : Sets the card filters according to the
 463  *                 selected program,
 464  *                 and makes the appropriate changes to stream structure.
 465  *****************************************************************************/
 466 int SatelliteSetProgram( input_thread_t    * p_input,
 467                          pgrm_descriptor_t * p_new_prg )
 468 {
 469     unsigned int i_es_index;
 470     vlc_value_t val;
 471     unsigned int u_adapter = 1;
 472     unsigned int u_device = 0;
 473     unsigned int u_video_type = 1; /* default video type */
 474     unsigned int u_audio_type = 2; /* default audio type */
 475
 476     // Get adapter and device number to use for this dvb card
 477     u_adapter = config_GetInt( p_input, "adapter" );
 478     u_device  = config_GetInt( p_input, "device" );
 479
 480     if ( p_input->stream.p_selected_program )
 481     {
 482         for ( i_es_index = 1 ; /* 0 should be the PMT */
 483                 i_es_index < p_input->stream.p_selected_program->i_es_number ;
 484                 i_es_index ++ )
 485         {
 486 #define p_es p_input->stream.p_selected_program->pp_es[i_es_index]
 487             if ( p_es->p_decoder_fifo )
 488             {
 489                 input_UnselectES( p_input , p_es );
 490             }
 491             if ( p_es->i_demux_fd )
 492             {
 493                 ioctl_UnsetDMXFilter(p_input, p_es->i_demux_fd );
 494                 p_es->i_demux_fd = 0;
 495             }
 496 #undef p_es
 497         }
 498     }
 499
 500     for (i_es_index = 1 ; i_es_index < p_new_prg->i_es_number ; i_es_index ++ )
 501     {
 502 #define p_es p_new_prg->pp_es[i_es_index]
 503         switch( p_es->i_cat )
 504         {
 505             case MPEG1_VIDEO_ES:
 506             case MPEG2_VIDEO_ES:
 507             case MPEG2_MOTO_VIDEO_ES:
 508                 if ( input_SelectES( p_input , p_es ) == 0 )
 509                 {
 510                     ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, u_video_type,
 511                                        u_adapter, u_device);
 512                     u_video_type += 3;
 513                 }
 514                 break;
 515             case MPEG1_AUDIO_ES:
 516             case MPEG2_AUDIO_ES:
 517                 if ( input_SelectES( p_input , p_es ) == 0 )
 518                 {
 519                     ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, u_audio_type,
 520                                        u_adapter, u_device);
 521                     input_SelectES( p_input , p_es );
 522                     u_audio_type += 3;
 523                 }
 524                 break;
 525             default:
 526                 ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, 3, u_adapter, u_device);
 527                 input_SelectES( p_input , p_es );
 528                 break;
 529 #undef p_es
 530         }
 531     }
 532
 533     p_input->stream.p_selected_program = p_new_prg;
 534
 535     /* Update the navigation variables without triggering a callback */
 536     val.i_int = p_new_prg->i_number;
 537     var_Change( p_input, "program", VLC_VAR_SETVALUE, &val, NULL );
 538
 539     return 0;
 540 }
 541
 542 /*****************************************************************************
 543  * SatelliteSeek: does nothing (not a seekable stream
 544  *****************************************************************************/
 545 static void SatelliteSeek( input_thread_t * p_input, off_t i_off )
 546 {
 547     ;
 548 }
 549