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