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     int                 i_lnb_lof1;
  86     int                 i_lnb_lof2;
  87     int                 i_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;
 147         frontend_info.frequency_min = 10000;
 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     if ( ((u_freq) > frontend_info.frequency_max) ||
 177          ((u_freq) < frontend_info.frequency_min) )
 178     {
 179         msg_Warn( p_input, "invalid frequency %d (kHz), using default one", u_freq );
 180         u_freq = config_GetInt( p_input, "frequency" );
 181         if ( ((u_freq) > frontend_info.frequency_max) ||
 182              ((u_freq) < frontend_info.frequency_min) )
 183         {
 184             msg_Err( p_input, "invalid default frequency" );
 185             return -1;
 186         }
 187     }
 188
 189     if ( ((u_srate) > frontend_info.symbol_rate_max) ||
 190          ((u_srate) < frontend_info.symbol_rate_min) )
 191     {
 192         msg_Warn( p_input, "invalid symbol rate, using default one" );
 193         u_srate = config_GetInt( p_input, "symbol-rate" );
 194         if ( ((u_srate) > frontend_info.symbol_rate_max) ||
 195              ((u_srate) < frontend_info.symbol_rate_min) )
 196         {
 197             msg_Err( p_input, "invalid default symbol rate" );
 198             return -1;
 199         }
 200     }
 201
 202     if( b_polarisation && (b_polarisation != 1) )
 203     {
 204         msg_Warn( p_input, "invalid polarization, using default one" );
 205         b_polarisation = config_GetInt( p_input, "polarization" );
 206         if( b_polarisation && b_polarisation != 1 )
 207         {
 208             msg_Err( p_input, "invalid default polarization" );
 209             return -1;
 210         }
 211     }
 212
 213     if( (i_fec > 9) || (i_fec < 1) )
 214     {
 215         msg_Warn( p_input, "invalid FEC, using default one" );
 216         i_fec = config_GetInt( p_input, "fec" );
 217         if( (i_fec > 9) || (i_fec < 1) )
 218         {
 219             msg_Err( p_input, "invalid default FEC" );
 220             return -1;
 221         }
 222     }
 223
 224     /* Get antenna configuration options */
 225     b_diseqc = config_GetInt( p_input, "diseqc" );
 226     i_lnb_lof1 = config_GetInt( p_input, "lnb-lof1" );
 227     i_lnb_lof2 = config_GetInt( p_input, "lnb-lof2" );
 228     i_lnb_slof = config_GetInt( p_input, "lnb-slof" );
 229
 230     /* Setting frontend parameters for tuning the hardware */
 231     switch( frontend_info.type )
 232     {
 233         /* DVB-S: satellite and budget cards (nova) */
 234         case FE_QPSK:
 235             fep.frequency = u_freq * 1000;
 236             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
 237             fep.u.qpsk.symbol_rate = u_srate * 1000;
 238             fep.u.qpsk.fec_inner = dvb_DecodeFEC(p_input, i_fec);
 239             msg_Dbg( p_input, "satellite (QPSK) frontend found on %s", frontend_info.name );
 240             break;
 241
 242         /* DVB-C */
 243         case FE_QAM:
 244             i_modulation  = config_GetInt(p_input, "modulation");
 245
 246             fep.frequency = u_freq * 1000;
 247             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
 248             fep.u.qam.symbol_rate = u_srate * 1000;
 249             fep.u.qam.fec_inner = dvb_DecodeFEC(p_input, i_fec);
 250             fep.u.qam.modulation = dvb_DecodeModulation(p_input, i_modulation);
 251             msg_Dbg( p_input, "cable (QAM) frontend found on %s", frontend_info.name );
 252             break;
 253
 254         /* DVB-T */
 255         case FE_OFDM:
 256             i_bandwidth = config_GetInt( p_input, "bandwidth");
 257             i_code_rate_HP = config_GetInt(p_input, "code-rate-hp");
 258             i_code_rate_LP = config_GetInt(p_input, "code-rate-lp");
 259             i_modulation  = config_GetInt(p_input, "modulation");
 260             i_transmission = config_GetInt(p_input, "transmission");
 261             i_guard = config_GetInt(p_input, "guard");
 262             i_hierarchy = config_GetInt(p_input, "hierarchy");
 263
 264             fep.frequency = u_freq * 1000;
 265             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
 266             fep.u.ofdm.bandwidth = dvb_DecodeBandwidth(p_input, i_bandwidth);
 267             fep.u.ofdm.code_rate_HP = dvb_DecodeFEC(p_input, i_code_rate_HP);
 268             fep.u.ofdm.code_rate_LP = dvb_DecodeFEC(p_input, i_code_rate_LP);
 269             fep.u.ofdm.constellation = dvb_DecodeModulation(p_input, i_modulation);
 270             fep.u.ofdm.transmission_mode = dvb_DecodeTransmission(p_input, i_transmission);
 271             fep.u.ofdm.guard_interval = dvb_DecodeGuardInterval(p_input, i_guard);
 272             fep.u.ofdm.hierarchy_information = dvb_DecodeHierarchy(p_input, i_hierarchy);
 273             msg_Dbg( p_input, "terrestrial (OFDM) frontend found on %s", frontend_info.name );
 274             break;
 275
 276         default:
 277             msg_Err( p_input, "Could not determine frontend type on %s", frontend_info.name );
 278             return -1;
 279     }
 280
 281     /* Initialise structure */
 282     p_satellite = malloc( sizeof( input_socket_t ) );
 283
 284     if( p_satellite == NULL )
 285     {
 286         msg_Err( p_input, "out of memory" );
 287         return -1;
 288     }
 289
 290     p_input->p_access_data = (void *)p_satellite;
 291
 292     /* Open the DVR device */
 293     i_len = sizeof(DVR);
 294     if (snprintf(dvr, sizeof(DVR), DVR, u_adapter, u_device) >= i_len)
 295     {
 296         msg_Err( p_input, "snprintf() truncated string for DVR" );
 297         dvr[sizeof(DVR)] = '\0';
 298     }
 299     msg_Dbg( p_input, "opening DVR device '%s'", dvr );
 300
 301     if( (p_satellite->i_handle = open( dvr,
 302                                    /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
 303     {
 304 #   ifdef HAVE_ERRNO_H
 305         msg_Warn( p_input, "cannot open `%s' (%s)", dvr, strerror(errno) );
 306 #   else
 307         msg_Warn( p_input, "cannot open `%s'", dvr );
 308 #   endif
 309         free( p_satellite );
 310         return -1;
 311     }
 312
 313     /* Initialize the Satellite Card */
 314     switch (ioctl_SetFrontend (p_input, fep, b_polarisation, u_adapter, u_device ))
 315     {
 316         case -2:
 317             msg_Err( p_input, "frontend returned an unexpected event" );
 318             close( p_satellite->i_handle );
 319             free( p_satellite );
 320             return -1;
 321         case -3:
 322             msg_Err( p_input, "frontend returned no event" );
 323             close( p_satellite->i_handle );
 324             free( p_satellite );
 325             return -1;
 326         case -4:
 327             msg_Err( p_input, "frontend: timeout when polling for event" );
 328             close( p_satellite->i_handle );
 329             free( p_satellite );
 330             return -1;
 331         case -5:
 332             msg_Err( p_input, "an error occured when polling frontend device" );
 333             close( p_satellite->i_handle );
 334             free( p_satellite );
 335             return -1;
 336         case -1:
 337             msg_Err( p_input, "frontend returned a failure event" );
 338             close( p_satellite->i_handle );
 339             free( p_satellite );
 340             return -1;
 341         default:
 342             break;
 343     }
 344
 345     msg_Dbg( p_input, "setting filter on PAT" );
 346
 347     if ( ioctl_SetDMXFilter(p_input, 0, &i_fd, 3, u_adapter, u_device ) < 0 )
 348     {
 349 #   ifdef HAVE_ERRNO_H
 350         msg_Err( p_input, "an error occured when setting filter on PAT (%s)", strerror(errno) );
 351 #   else
 352         msg_Err( p_input, "an error occured when setting filter on PAT" );
 353 #   endif
 354         close( p_satellite->i_handle );
 355         free( p_satellite );
 356         return -1;
 357     }
 358
 359     if( input_InitStream( p_input, sizeof( stream_ts_data_t ) ) == -1 )
 360     {
 361         msg_Err( p_input, "could not initialize stream structure" );
 362         close( p_satellite->i_handle );
 363         free( p_satellite );
 364         return( -1 );
 365     }
 366
 367     vlc_mutex_lock( &p_input->stream.stream_lock );
 368
 369     p_input->stream.b_pace_control = 1;
 370     p_input->stream.b_seekable = 0;
 371     p_input->stream.p_selected_area->i_tell = 0;
 372
 373     vlc_mutex_unlock( &p_input->stream.stream_lock );
 374
 375     p_input->i_mtu = SATELLITE_READ_ONCE * TS_PACKET_SIZE;
 376     p_input->stream.i_method = INPUT_METHOD_SATELLITE;
 377
 378     return 0;
 379 }
 380
 381 /*****************************************************************************
 382  * Close : Close the device
 383  *****************************************************************************/
 384 void E_(Close) ( vlc_object_t *p_this )
 385 {
 386     input_thread_t *    p_input = (input_thread_t *)p_this;
 387     input_socket_t *    p_satellite;
 388     unsigned int        i_es_index;
 389
 390     if ( p_input->stream.p_selected_program )
 391     {
 392         for ( i_es_index = 1 ;
 393                 i_es_index < p_input->stream.p_selected_program->i_es_number;
 394                 i_es_index ++ )
 395         {
 396 #define p_es p_input->stream.p_selected_program->pp_es[i_es_index]
 397             if ( p_es->p_decoder_fifo )
 398             {
 399                 ioctl_UnsetDMXFilter(p_input, p_es->i_demux_fd );
 400             }
 401 #undef p_es
 402         }
 403     }
 404
 405     p_satellite = (input_socket_t *)p_input;
 406     close( p_satellite->i_handle );
 407 }
 408
 409 /*****************************************************************************
 410  * SatelliteRead: reads data from the satellite card
 411  *****************************************************************************/
 412 static ssize_t SatelliteRead( input_thread_t * p_input, byte_t * p_buffer,
 413                               size_t i_len )
 414 {
 415     input_socket_t * p_access_data = (input_socket_t *)p_input->p_access_data;
 416     ssize_t i_ret;
 417     unsigned int u_adapter = 1;
 418     unsigned int u_device = 0;
 419     unsigned int i;
 420
 421     // Get adapter and device number to use for this dvb card
 422     u_adapter = config_GetInt( p_input, "adapter" );
 423     u_device  = config_GetInt( p_input, "device" );
 424
 425     /* if not set, set filters to the PMTs */
 426     for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
 427     {
 428         if ( p_input->stream.pp_programs[i]->pp_es[0]->i_demux_fd == 0 )
 429         {
 430             ioctl_SetDMXFilter(p_input, p_input->stream.pp_programs[i]->pp_es[0]->i_id,
 431                        &p_input->stream.pp_programs[i]->pp_es[0]->i_demux_fd,
 432                        3, u_adapter, u_device );
 433         }
 434     }
 435
 436     i_ret = read( p_access_data->i_handle, p_buffer, i_len );
 437
 438     if( i_ret < 0 )
 439     {
 440 #   ifdef HAVE_ERRNO_H
 441         msg_Err( p_input, "read failed (%s)", strerror(errno) );
 442 #   else
 443         msg_Err( p_input, "read failed" );
 444 #   endif
 445     }
 446
 447     return i_ret;
 448 }
 449
 450 /*****************************************************************************
 451  * SatelliteSetArea : Does nothing
 452  *****************************************************************************/
 453 static int SatelliteSetArea( input_thread_t * p_input, input_area_t * p_area )
 454 {
 455     return -1;
 456 }
 457
 458 /*****************************************************************************
 459  * SatelliteSetProgram : Sets the card filters according to the
 460  *                 selected program,
 461  *                 and makes the appropriate changes to stream structure.
 462  *****************************************************************************/
 463 int SatelliteSetProgram( input_thread_t    * p_input,
 464                          pgrm_descriptor_t * p_new_prg )
 465 {
 466     unsigned int i_es_index;
 467     vlc_value_t val;
 468     unsigned int u_adapter = 1;
 469     unsigned int u_device = 0;
 470     unsigned int u_video_type = 1; /* default video type */
 471     unsigned int u_audio_type = 2; /* default audio type */
 472
 473     // Get adapter and device number to use for this dvb card
 474     u_adapter = config_GetInt( p_input, "adapter" );
 475     u_device  = config_GetInt( p_input, "device" );
 476
 477     if ( p_input->stream.p_selected_program )
 478     {
 479         for ( i_es_index = 1 ; /* 0 should be the PMT */
 480                 i_es_index < p_input->stream.p_selected_program->i_es_number ;
 481                 i_es_index ++ )
 482         {
 483 #define p_es p_input->stream.p_selected_program->pp_es[i_es_index]
 484             if ( p_es->p_decoder_fifo )
 485             {
 486                 input_UnselectES( p_input , p_es );
 487             }
 488             if ( p_es->i_demux_fd )
 489             {
 490                 ioctl_UnsetDMXFilter(p_input, p_es->i_demux_fd );
 491                 p_es->i_demux_fd = 0;
 492             }
 493 #undef p_es
 494         }
 495     }
 496
 497     for (i_es_index = 1 ; i_es_index < p_new_prg->i_es_number ; i_es_index ++ )
 498     {
 499 #define p_es p_new_prg->pp_es[i_es_index]
 500         switch( p_es->i_cat )
 501         {
 502             case MPEG1_VIDEO_ES:
 503             case MPEG2_VIDEO_ES:
 504             case MPEG2_MOTO_VIDEO_ES:
 505                 if ( input_SelectES( p_input , p_es ) == 0 )
 506                 {
 507                     ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, u_video_type,
 508                                        u_adapter, u_device);
 509                     u_video_type += 3;
 510                 }
 511                 break;
 512             case MPEG1_AUDIO_ES:
 513             case MPEG2_AUDIO_ES:
 514                 if ( input_SelectES( p_input , p_es ) == 0 )
 515                 {
 516                     ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, u_audio_type,
 517                                        u_adapter, u_device);
 518                     input_SelectES( p_input , p_es );
 519                     u_audio_type += 3;
 520                 }
 521                 break;
 522             default:
 523                 ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, 3, u_adapter, u_device);
 524                 input_SelectES( p_input , p_es );
 525                 break;
 526 #undef p_es
 527         }
 528     }
 529
 530     p_input->stream.p_selected_program = p_new_prg;
 531
 532     /* Update the navigation variables without triggering a callback */
 533     val.i_int = p_new_prg->i_number;
 534     var_Change( p_input, "program", VLC_VAR_SETVALUE, &val, NULL );
 535
 536     return 0;
 537 }
 538
 539 /*****************************************************************************
 540  * SatelliteSeek: does nothing (not a seekable stream
 541  *****************************************************************************/
 542 static void SatelliteSeek( input_thread_t * p_input, off_t i_off )
 543 {
 544     ;
 545 }
 546