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-2005 the VideoLAN team
   5  *
   6  * Authors: Johan Bilien <jobi@via.ecp.fr>
   7  *          Jean-Paul Saman <jpsaman _at_ videolan _dot_ org>
   8  *          Christophe Massiot <massiot@via.ecp.fr>
   9  *          Laurent Aimar <fenrir@via.ecp.fr>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  24  *****************************************************************************/
  25
  26
  27 /*****************************************************************************
  28  * Preamble
  29  *****************************************************************************/
  30 #include <vlc/vlc.h>
  31 #include <vlc_access.h>
  32 #include <vlc_interface.h>
  33
  34 #ifdef HAVE_UNISTD_H
  35 #   include <unistd.h>
  36 #endif
  37
  38 #include <fcntl.h>
  39 #include <sys/types.h>
  40 #include <sys/poll.h>
  41
  42 #include <errno.h>
  43
  44 /* Include dvbpsi headers */
  45 #ifdef HAVE_DVBPSI_DR_H
  46 #   include <dvbpsi/dvbpsi.h>
  47 #   include <dvbpsi/descriptor.h>
  48 #   include <dvbpsi/pat.h>
  49 #   include <dvbpsi/pmt.h>
  50 #   include <dvbpsi/dr.h>
  51 #   include <dvbpsi/psi.h>
  52 #else
  53 #   include "dvbpsi.h"
  54 #   include "descriptor.h"
  55 #   include "tables/pat.h"
  56 #   include "tables/pmt.h"
  57 #   include "descriptors/dr.h"
  58 #   include "psi.h"
  59 #endif
  60
  61 #ifdef ENABLE_HTTPD
  62 #   include "vlc_httpd.h"
  63 #endif
  64
  65 #include "dvb.h"
  66
  67 /*****************************************************************************
  68  * Module descriptor
  69  *****************************************************************************/
  70 static int  Open( vlc_object_t *p_this );
  71 static void Close( vlc_object_t *p_this );
  72
  73 #define CACHING_TEXT N_("Caching value in ms")
  74 #define CACHING_LONGTEXT N_( \
  75     "Caching value for DVB streams. This " \
  76     "value should be set in milliseconds." )
  77
  78 #define ADAPTER_TEXT N_("Adapter card to tune")
  79 #define ADAPTER_LONGTEXT N_("Adapter cards have a device file in directory named /dev/dvb/adapter[n] with n>=0.")
  80
  81 #define DEVICE_TEXT N_("Device number to use on adapter")
  82 #define DEVICE_LONGTEXT ""
  83
  84 #define FREQ_TEXT N_("Transponder/multiplex frequency")
  85 #define FREQ_LONGTEXT N_("In kHz for DVB-S or Hz for DVB-C/T")
  86
  87 #define INVERSION_TEXT N_("Inversion mode")
  88 #define INVERSION_LONGTEXT N_("Inversion mode [0=off, 1=on, 2=auto]")
  89
  90 #define PROBE_TEXT N_("Probe DVB card for capabilities")
  91 #define PROBE_LONGTEXT N_("Some DVB cards do not like to be probed for their capabilities, you can disable this feature if you experience some trouble.")
  92
  93 #define BUDGET_TEXT N_("Budget mode")
  94 #define BUDGET_LONGTEXT N_("This allows you to stream an entire transponder with a \"budget\" card.")
  95
  96 /* Satellite */
  97 #define SATNO_TEXT N_("Satellite number in the Diseqc system")
  98 #define SATNO_LONGTEXT N_("[0=no diseqc, 1-4=satellite number].")
  99
 100 #define VOLTAGE_TEXT N_("LNB voltage")
 101 #define VOLTAGE_LONGTEXT N_("In Volts [0, 13=vertical, 18=horizontal].")
 102
 103 #define HIGH_VOLTAGE_TEXT N_("High LNB voltage")
 104 #define HIGH_VOLTAGE_LONGTEXT N_("Enable high voltage if your cables are " \
 105     "particularly long. This is not supported by all frontends.")
 106
 107 #define TONE_TEXT N_("22 kHz tone")
 108 #define TONE_LONGTEXT N_("[0=off, 1=on, -1=auto].")
 109
 110 #define FEC_TEXT N_("Transponder FEC")
 111 #define FEC_LONGTEXT N_("FEC=Forward Error Correction mode [9=auto].")
 112
 113 #define SRATE_TEXT N_("Transponder symbol rate in kHz")
 114 #define SRATE_LONGTEXT ""
 115
 116 #define LNB_LOF1_TEXT N_("Antenna lnb_lof1 (kHz)")
 117 #define LNB_LOF1_LONGTEXT ""
 118
 119 #define LNB_LOF2_TEXT N_("Antenna lnb_lof2 (kHz)")
 120 #define LNB_LOF2_LONGTEXT ""
 121
 122 #define LNB_SLOF_TEXT N_("Antenna lnb_slof (kHz)")
 123 #define LNB_SLOF_LONGTEXT ""
 124
 125 /* Cable */
 126 #define MODULATION_TEXT N_("Modulation type")
 127 #define MODULATION_LONGTEXT N_("Modulation type for front-end device.")
 128
 129 /* Terrestrial */
 130 #define CODE_RATE_HP_TEXT N_("Terrestrial high priority stream code rate (FEC)")
 131 #define CODE_RATE_HP_LONGTEXT ""
 132
 133 #define CODE_RATE_LP_TEXT N_("Terrestrial low priority stream code rate (FEC)")
 134 #define CODE_RATE_LP_LONGTEXT ""
 135
 136 #define BANDWIDTH_TEXT N_("Terrestrial bandwidth")
 137 #define BANDWIDTH_LONGTEXT N_("Terrestrial bandwidth [0=auto,6,7,8 in MHz]")
 138
 139 #define GUARD_TEXT N_("Terrestrial guard interval")
 140 #define GUARD_LONGTEXT ""
 141
 142 #define TRANSMISSION_TEXT N_("Terrestrial transmission mode")
 143 #define TRANSMISSION_LONGTEXT ""
 144
 145 #define HIERARCHY_TEXT N_("Terrestrial hierarchy mode")
 146 #define HIERARCHY_LONGTEXT ""
 147
 148 #define HOST_TEXT N_( "HTTP Host address" )
 149 #define HOST_LONGTEXT N_( \
 150     "To enable the internal HTTP server, set its address and port here." )
 151
 152 #define USER_TEXT N_( "HTTP user name" )
 153 #define USER_LONGTEXT N_( \
 154     "User name the administrator will use to log into " \
 155     "the internal HTTP server." )
 156
 157 #define PASSWORD_TEXT N_( "HTTP password" )
 158 #define PASSWORD_LONGTEXT N_( \
 159     "Password the administrator will use to log into " \
 160     "the internal HTTP server." )
 161
 162 #define ACL_TEXT N_( "HTTP ACL" )
 163 #define ACL_LONGTEXT N_( \
 164     "Access control list (equivalent to .hosts) file path, " \
 165     "which will limit the range of IPs entitled to log into the internal " \
 166     "HTTP server." )
 167
 168 #define CERT_TEXT N_( "Certificate file" )
 169 #define CERT_LONGTEXT N_( "HTTP interface x509 PEM certificate file " \
 170                           "(enables SSL)" )
 171
 172 #define KEY_TEXT N_( "Private key file" )
 173 #define KEY_LONGTEXT N_( "HTTP interface x509 PEM private key file" )
 174
 175 #define CA_TEXT N_( "Root CA file" )
 176 #define CA_LONGTEXT N_( "HTTP interface x509 PEM trusted root CA " \
 177                         "certificates file" )
 178
 179 #define CRL_TEXT N_( "CRL file" )
 180 #define CRL_LONGTEXT N_( "HTTP interface Certificates Revocation List file" )
 181
 182 vlc_module_begin();
 183     set_shortname( _("DVB") );
 184     set_description( _("DVB input with v4l2 support") );
 185     set_category( CAT_INPUT );
 186     set_subcategory( SUBCAT_INPUT_ACCESS );
 187
 188     add_integer( "dvb-caching", DEFAULT_PTS_DELAY / 1000, NULL, CACHING_TEXT,
 189                  CACHING_LONGTEXT, VLC_TRUE );
 190     add_integer( "dvb-adapter", 0, NULL, ADAPTER_TEXT, ADAPTER_LONGTEXT,
 191                  VLC_FALSE );
 192     add_integer( "dvb-device", 0, NULL, DEVICE_TEXT, DEVICE_LONGTEXT,
 193                  VLC_TRUE );
 194     add_integer( "dvb-frequency", 11954000, NULL, FREQ_TEXT, FREQ_LONGTEXT,
 195                  VLC_FALSE );
 196     add_integer( "dvb-inversion", 2, NULL, INVERSION_TEXT, INVERSION_LONGTEXT,
 197                  VLC_TRUE );
 198     add_bool( "dvb-probe", 1, NULL, PROBE_TEXT, PROBE_LONGTEXT, VLC_TRUE );
 199     add_bool( "dvb-budget-mode", 0, NULL, BUDGET_TEXT, BUDGET_LONGTEXT,
 200               VLC_TRUE );
 201     /* DVB-S (satellite) */
 202     add_integer( "dvb-satno", 0, NULL, SATNO_TEXT, SATNO_LONGTEXT,
 203                  VLC_TRUE );
 204     add_integer( "dvb-voltage", 13, NULL, VOLTAGE_TEXT, VOLTAGE_LONGTEXT,
 205                  VLC_TRUE );
 206     add_bool( "dvb-high-voltage", 0, NULL, HIGH_VOLTAGE_TEXT,
 207               HIGH_VOLTAGE_LONGTEXT, VLC_TRUE );
 208     add_integer( "dvb-tone", -1, NULL, TONE_TEXT, TONE_LONGTEXT,
 209                  VLC_TRUE );
 210     add_integer( "dvb-fec", 9, NULL, FEC_TEXT, FEC_LONGTEXT, VLC_TRUE );
 211     add_integer( "dvb-srate", 27500000, NULL, SRATE_TEXT, SRATE_LONGTEXT,
 212                  VLC_FALSE );
 213     add_integer( "dvb-lnb-lof1", 0, NULL, LNB_LOF1_TEXT,
 214                  LNB_LOF1_LONGTEXT, VLC_TRUE );
 215     add_integer( "dvb-lnb-lof2", 0, NULL, LNB_LOF2_TEXT,
 216                  LNB_LOF2_LONGTEXT, VLC_TRUE );
 217     add_integer( "dvb-lnb-slof", 0, NULL, LNB_SLOF_TEXT,
 218                  LNB_SLOF_LONGTEXT, VLC_TRUE );
 219     /* DVB-C (cable) */
 220     add_integer( "dvb-modulation", 0, NULL, MODULATION_TEXT,
 221                  MODULATION_LONGTEXT, VLC_TRUE );
 222     /* DVB-T (terrestrial) */
 223     add_integer( "dvb-code-rate-hp", 9, NULL, CODE_RATE_HP_TEXT,
 224                  CODE_RATE_HP_LONGTEXT, VLC_TRUE );
 225     add_integer( "dvb-code-rate-lp", 9, NULL, CODE_RATE_LP_TEXT,
 226                  CODE_RATE_LP_LONGTEXT, VLC_TRUE );
 227     add_integer( "dvb-bandwidth", 0, NULL, BANDWIDTH_TEXT, BANDWIDTH_LONGTEXT,
 228                  VLC_TRUE );
 229     add_integer( "dvb-guard", 0, NULL, GUARD_TEXT, GUARD_LONGTEXT, VLC_TRUE );
 230     add_integer( "dvb-transmission", 0, NULL, TRANSMISSION_TEXT,
 231                  TRANSMISSION_LONGTEXT, VLC_TRUE );
 232     add_integer( "dvb-hierarchy", 0, NULL, HIERARCHY_TEXT, HIERARCHY_LONGTEXT,
 233                  VLC_TRUE );
 234 #ifdef ENABLE_HTTPD
 235     /* MMI HTTP interface */
 236     set_section( N_("HTTP server" ), 0 );
 237     add_string( "dvb-http-host", NULL, NULL, HOST_TEXT, HOST_LONGTEXT,
 238                 VLC_TRUE );
 239     add_string( "dvb-http-user", NULL, NULL, USER_TEXT, USER_LONGTEXT,
 240                 VLC_TRUE );
 241     add_string( "dvb-http-password", NULL, NULL, PASSWORD_TEXT,
 242                 PASSWORD_LONGTEXT, VLC_TRUE );
 243     add_string( "dvb-http-acl", NULL, NULL, ACL_TEXT, ACL_LONGTEXT,
 244                 VLC_TRUE );
 245     add_string( "dvb-http-intf-cert", NULL, NULL, CERT_TEXT, CERT_LONGTEXT,
 246                 VLC_TRUE );
 247     add_string( "dvb-http-intf-key",  NULL, NULL, KEY_TEXT,  KEY_LONGTEXT,
 248                 VLC_TRUE );
 249     add_string( "dvb-http-intf-ca",   NULL, NULL, CA_TEXT,   CA_LONGTEXT,
 250                 VLC_TRUE );
 251     add_string( "dvb-http-intf-crl",  NULL, NULL, CRL_TEXT,  CRL_LONGTEXT,
 252                 VLC_TRUE );
 253 #endif
 254
 255     set_capability( "access2", 0 );
 256     add_shortcut( "dvb" );      /* Generic name */
 257
 258     add_shortcut( "dvb-s" );    /* Satellite */
 259     add_shortcut( "qpsk" );
 260     add_shortcut( "satellite" );
 261
 262     add_shortcut( "dvb-c" );    /* Cable */
 263     add_shortcut( "cable" );
 264
 265     add_shortcut( "dvb-t" );    /* Terrestrial */
 266     add_shortcut( "terrestrial" );
 267
 268     add_shortcut( "atsc" );     /* Atsc */
 269     add_shortcut( "usdigital" );
 270
 271     set_callbacks( Open, Close );
 272 vlc_module_end();
 273
 274
 275 /*****************************************************************************
 276  * Local prototypes
 277  *****************************************************************************/
 278 static block_t *Block( access_t * );
 279 static int Control( access_t *, int, va_list );
 280
 281 #define DVB_READ_ONCE 20
 282 #define DVB_READ_ONCE_START 2
 283 #define TS_PACKET_SIZE 188
 284
 285 static void FilterUnset( access_t *, int i_max );
 286 static void FilterUnsetPID( access_t *, int i_pid );
 287 static void FilterSet( access_t *, int i_pid, int i_type );
 288
 289 static void VarInit( access_t * );
 290 static int  ParseMRL( access_t * );
 291
 292
 293 /*****************************************************************************
 294  * Open: open the frontend device
 295  *****************************************************************************/
 296 static int Open( vlc_object_t *p_this )
 297 {
 298     access_t     *p_access = (access_t*)p_this;
 299     access_sys_t *p_sys;
 300
 301     /* Only if selected */
 302     if( *p_access->psz_access == '\0' )
 303         return VLC_EGENERIC;
 304
 305     /* Set up access */
 306     p_access->pf_read = NULL;
 307     p_access->pf_block = Block;
 308     p_access->pf_control = Control;
 309     p_access->pf_seek = NULL;
 310     p_access->info.i_update = 0;
 311     p_access->info.i_size = 0;
 312     p_access->info.i_pos = 0;
 313     p_access->info.b_eof = VLC_FALSE;
 314     p_access->info.i_title = 0;
 315     p_access->info.i_seekpoint = 0;
 316
 317     p_access->p_sys = p_sys = malloc( sizeof( access_sys_t ) );
 318     if( !p_sys )
 319         return VLC_ENOMEM;
 320
 321     memset( p_sys, 0, sizeof( access_sys_t ) );
 322
 323     /* Create all variables */
 324     VarInit( p_access );
 325
 326     /* Parse the command line */
 327     if( ParseMRL( p_access ) )
 328     {
 329         free( p_sys );
 330         return VLC_EGENERIC;
 331     }
 332
 333     /* Getting frontend info */
 334     if( E_(FrontendOpen)( p_access) )
 335     {
 336         free( p_sys );
 337         return VLC_EGENERIC;
 338     }
 339
 340     /* Setting frontend parameters for tuning the hardware */
 341     msg_Dbg( p_access, "trying to tune the frontend...");
 342     if( E_(FrontendSet)( p_access ) < 0 )
 343     {
 344         E_(FrontendClose)( p_access );
 345         free( p_sys );
 346         return VLC_EGENERIC;
 347     }
 348
 349     /* Opening DVR device */
 350     if( E_(DVROpen)( p_access ) < 0 )
 351     {
 352         E_(FrontendClose)( p_access );
 353         free( p_sys );
 354         return VLC_EGENERIC;
 355     }
 356
 357     p_sys->b_budget_mode = var_GetBool( p_access, "dvb-budget-mode" );
 358     if( p_sys->b_budget_mode )
 359     {
 360         msg_Dbg( p_access, "setting filter on all PIDs" );
 361         FilterSet( p_access, 0x2000, OTHER_TYPE );
 362     }
 363     else
 364     {
 365         msg_Dbg( p_access, "setting filter on PAT" );
 366         FilterSet( p_access, 0x0, OTHER_TYPE );
 367     }
 368
 369     E_(CAMOpen)( p_access );
 370
 371     if( p_sys->b_budget_mode )
 372         p_sys->i_read_once = DVB_READ_ONCE;
 373     else
 374         p_sys->i_read_once = DVB_READ_ONCE_START;
 375
 376 #ifdef ENABLE_HTTPD
 377     E_(HTTPOpen)( p_access );
 378 #endif
 379
 380     return VLC_SUCCESS;
 381 }
 382
 383 /*****************************************************************************
 384  * Close : Close the device
 385  *****************************************************************************/
 386 static void Close( vlc_object_t *p_this )
 387 {
 388     access_t     *p_access = (access_t*)p_this;
 389     access_sys_t *p_sys = p_access->p_sys;
 390
 391     FilterUnset( p_access, p_sys->b_budget_mode ? 1 : MAX_DEMUX );
 392
 393     E_(DVRClose)( p_access );
 394     E_(FrontendClose)( p_access );
 395     E_(CAMClose)( p_access );
 396
 397 #ifdef ENABLE_HTTPD
 398     E_(HTTPClose)( p_access );
 399 #endif
 400
 401     free( p_sys );
 402 }
 403
 404 /*****************************************************************************
 405  * Block:
 406  *****************************************************************************/
 407 static block_t *Block( access_t *p_access )
 408 {
 409     access_sys_t *p_sys = p_access->p_sys;
 410     block_t *p_block;
 411
 412     for ( ; ; )
 413     {
 414         struct pollfd ufds[2];
 415         int i_ret;
 416
 417         /* Initialize file descriptor sets */
 418         memset (ufds, 0, sizeof (ufds));
 419         ufds[0].fd = p_sys->i_handle;
 420         ufds[0].events = POLLIN;
 421         ufds[1].fd = p_sys->i_frontend_handle;
 422         ufds[1].events = POLLPRI;
 423
 424         /* We'll wait 0.5 second if nothing happens */
 425         /* Find if some data is available */
 426         i_ret = poll( ufds, 2, 500 );
 427
 428         if ( p_access->b_die )
 429             return NULL;
 430
 431         if ( i_ret < 0 )
 432         {
 433             if( errno == EINTR )
 434                 continue;
 435
 436             msg_Err( p_access, "poll error: %s", strerror(errno) );
 437             return NULL;
 438         }
 439
 440         if ( p_sys->i_ca_handle && mdate() > p_sys->i_ca_next_event )
 441         {
 442             E_(CAMPoll)( p_access );
 443             p_sys->i_ca_next_event = mdate() + p_sys->i_ca_timeout;
 444         }
 445
 446         if ( ufds[1].revents )
 447         {
 448             E_(FrontendPoll)( p_access );
 449         }
 450
 451 #ifdef ENABLE_HTTPD
 452         if ( p_sys->i_httpd_timeout && mdate() > p_sys->i_httpd_timeout )
 453         {
 454             vlc_mutex_lock( &p_sys->httpd_mutex );
 455             if ( p_sys->b_request_frontend_info )
 456             {
 457                 msg_Warn( p_access, "frontend timeout for HTTP interface" );
 458                 p_sys->b_request_frontend_info = VLC_FALSE;
 459                 p_sys->psz_frontend_info = strdup( "Timeout getting info\n" );
 460             }
 461             if ( p_sys->b_request_mmi_info )
 462             {
 463                 msg_Warn( p_access, "MMI timeout for HTTP interface" );
 464                 p_sys->b_request_mmi_info = VLC_FALSE;
 465                 p_sys->psz_mmi_info = strdup( "Timeout getting info\n" );
 466             }
 467             vlc_cond_signal( &p_sys->httpd_cond );
 468             vlc_mutex_unlock( &p_sys->httpd_mutex );
 469         }
 470
 471         if ( p_sys->b_request_frontend_info )
 472         {
 473             E_(FrontendStatus)( p_access );
 474         }
 475
 476         if ( p_sys->b_request_mmi_info )
 477         {
 478             E_(CAMStatus)( p_access );
 479         }
 480 #endif
 481
 482         if ( p_sys->i_frontend_timeout && mdate() > p_sys->i_frontend_timeout )
 483         {
 484             msg_Warn( p_access, "no lock, tuning again" );
 485             E_(FrontendSet)( p_access );
 486         }
 487
 488         if ( ufds[0].revents )
 489         {
 490             p_block = block_New( p_access,
 491                                  p_sys->i_read_once * TS_PACKET_SIZE );
 492             if( ( p_block->i_buffer = read( p_sys->i_handle, p_block->p_buffer,
 493                                 p_sys->i_read_once * TS_PACKET_SIZE ) ) <= 0 )
 494             {
 495                 msg_Warn( p_access, "read failed (%s)", strerror(errno) );
 496                 block_Release( p_block );
 497                 continue;
 498             }
 499             break;
 500         }
 501     }
 502
 503     if( p_sys->i_read_once < DVB_READ_ONCE )
 504         p_sys->i_read_once++;
 505
 506     return p_block;
 507 }
 508
 509 /*****************************************************************************
 510  * Control:
 511  *****************************************************************************/
 512 static int Control( access_t *p_access, int i_query, va_list args )
 513 {
 514     access_sys_t *p_sys = p_access->p_sys;
 515     vlc_bool_t   *pb_bool, b_bool;
 516     int          *pi_int, i_int;
 517     int64_t      *pi_64;
 518
 519     switch( i_query )
 520     {
 521         /* */
 522         case ACCESS_CAN_SEEK:
 523         case ACCESS_CAN_FASTSEEK:
 524         case ACCESS_CAN_PAUSE:
 525         case ACCESS_CAN_CONTROL_PACE:
 526             pb_bool = (vlc_bool_t*)va_arg( args, vlc_bool_t* );
 527             *pb_bool = VLC_FALSE;
 528             break;
 529         /* */
 530         case ACCESS_GET_MTU:
 531             pi_int = (int*)va_arg( args, int * );
 532             *pi_int = DVB_READ_ONCE * TS_PACKET_SIZE;
 533             break;
 534
 535         case ACCESS_GET_PTS_DELAY:
 536             pi_64 = (int64_t*)va_arg( args, int64_t * );
 537             *pi_64 = var_GetInteger( p_access, "dvb-caching" ) * 1000;
 538             break;
 539
 540         /* */
 541         case ACCESS_SET_PAUSE_STATE:
 542         case ACCESS_GET_TITLE_INFO:
 543         case ACCESS_SET_TITLE:
 544         case ACCESS_SET_SEEKPOINT:
 545             return VLC_EGENERIC;
 546
 547         case ACCESS_SET_PRIVATE_ID_STATE:
 548             i_int  = (int)va_arg( args, int );               /* Private data (pid for now)*/
 549             b_bool = (vlc_bool_t)va_arg( args, vlc_bool_t ); /* b_selected */
 550             if( !p_sys->b_budget_mode )
 551             {
 552                 /* FIXME we may want to give the real type (me ?, I don't ;) */
 553                 if( b_bool )
 554                     FilterSet( p_access, i_int, OTHER_TYPE );
 555                 else
 556                     FilterUnsetPID( p_access, i_int );
 557             }
 558             break;
 559
 560         case ACCESS_SET_PRIVATE_ID_CA:
 561         {
 562             dvbpsi_pmt_t *p_pmt;
 563
 564             p_pmt = (dvbpsi_pmt_t *)va_arg( args, dvbpsi_pmt_t * );
 565
 566             E_(CAMSet)( p_access, p_pmt );
 567             break;
 568         }
 569
 570         default:
 571             msg_Warn( p_access, "unimplemented query in control" );
 572             return VLC_EGENERIC;
 573
 574     }
 575     return VLC_SUCCESS;
 576 }
 577
 578 /*****************************************************************************
 579  * FilterSet/FilterUnset:
 580  *****************************************************************************/
 581 static void FilterSet( access_t *p_access, int i_pid, int i_type )
 582 {
 583     access_sys_t *p_sys = p_access->p_sys;
 584     int i;
 585
 586     /* Find first free slot */
 587     for( i = 0; i < MAX_DEMUX; i++ )
 588     {
 589         if( !p_sys->p_demux_handles[i].i_type )
 590             break;
 591
 592         if( p_sys->p_demux_handles[i].i_pid == i_pid )
 593             return; /* Already set */
 594     }
 595
 596     if( i >= MAX_DEMUX )
 597     {
 598         msg_Err( p_access, "no free p_demux_handles !" );
 599         return;
 600     }
 601
 602     if( E_(DMXSetFilter)( p_access, i_pid,
 603                            &p_sys->p_demux_handles[i].i_handle, i_type ) )
 604     {
 605         msg_Err( p_access, "DMXSetFilter failed" );
 606         return;
 607     }
 608     p_sys->p_demux_handles[i].i_type = i_type;
 609     p_sys->p_demux_handles[i].i_pid = i_pid;
 610
 611     if( p_sys->i_read_once < DVB_READ_ONCE )
 612         p_sys->i_read_once++;
 613 }
 614
 615 static void FilterUnset( access_t *p_access, int i_max )
 616 {
 617     access_sys_t *p_sys = p_access->p_sys;
 618     int i;
 619
 620     for( i = 0; i < i_max; i++ )
 621     {
 622         if( p_sys->p_demux_handles[i].i_type )
 623         {
 624             E_(DMXUnsetFilter)( p_access, p_sys->p_demux_handles[i].i_handle );
 625             p_sys->p_demux_handles[i].i_type = 0;
 626         }
 627     }
 628 }
 629
 630 static void FilterUnsetPID( access_t *p_access, int i_pid )
 631 {
 632     access_sys_t *p_sys = p_access->p_sys;
 633     int i;
 634
 635     for( i = 0; i < MAX_DEMUX; i++ )
 636     {
 637         if( p_sys->p_demux_handles[i].i_type &&
 638             p_sys->p_demux_handles[i].i_pid == i_pid )
 639         {
 640             E_(DMXUnsetFilter)( p_access, p_sys->p_demux_handles[i].i_handle );
 641             p_sys->p_demux_handles[i].i_type = 0;
 642         }
 643     }
 644 }
 645
 646 /*****************************************************************************
 647  * VarInit/ParseMRL:
 648  *****************************************************************************/
 649 static void VarInit( access_t *p_access )
 650 {
 651     /* */
 652     var_Create( p_access, "dvb-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 653
 654     /* */
 655     var_Create( p_access, "dvb-adapter", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 656     var_Create( p_access, "dvb-device", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 657     var_Create( p_access, "dvb-frequency", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 658     var_Create( p_access, "dvb-inversion", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 659     var_Create( p_access, "dvb-probe", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
 660     var_Create( p_access, "dvb-budget-mode", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
 661
 662     /* */
 663     var_Create( p_access, "dvb-satno", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 664     var_Create( p_access, "dvb-voltage", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 665     var_Create( p_access, "dvb-high-voltage", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
 666     var_Create( p_access, "dvb-tone", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 667     var_Create( p_access, "dvb-fec", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 668     var_Create( p_access, "dvb-srate", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 669     var_Create( p_access, "dvb-lnb-lof1", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 670     var_Create( p_access, "dvb-lnb-lof2", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 671     var_Create( p_access, "dvb-lnb-slof", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 672
 673     /* */
 674     var_Create( p_access, "dvb-modulation", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 675
 676     /* */
 677     var_Create( p_access, "dvb-code-rate-hp", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 678     var_Create( p_access, "dvb-code-rate-lp", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 679     var_Create( p_access, "dvb-bandwidth", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 680     var_Create( p_access, "dvb-transmission", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 681     var_Create( p_access, "dvb-guard", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 682     var_Create( p_access, "dvb-hierarchy", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 683
 684 #ifdef ENABLE_HTTPD
 685     var_Create( p_access, "dvb-http-host", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 686     var_Create( p_access, "dvb-http-user", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 687     var_Create( p_access, "dvb-http-password", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 688     var_Create( p_access, "dvb-http-acl", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 689     var_Create( p_access, "dvb-http-intf-cert", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 690     var_Create( p_access, "dvb-http-intf-key", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 691     var_Create( p_access, "dvb-http-intf-ca", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 692     var_Create( p_access, "dvb-http-intf-crl", VLC_VAR_STRING | VLC_VAR_DOINHERIT );
 693 #endif
 694 }
 695
 696 /* */
 697 static int ParseMRL( access_t *p_access )
 698 {
 699     char *psz_dup = strdup( p_access->psz_path );
 700     char *psz_parser = psz_dup;
 701     char *psz_next;
 702     vlc_value_t         val;
 703
 704 #define GET_OPTION_INT( option )                                            \
 705     if ( !strncmp( psz_parser, option "=", strlen(option "=") ) )           \
 706     {                                                                       \
 707         val.i_int = strtol( psz_parser + strlen(option "="), &psz_parser,   \
 708                             0 );                                            \
 709         var_Set( p_access, "dvb-" option, val );                            \
 710     }
 711
 712 #define GET_OPTION_BOOL( option )                                           \
 713     if ( !strncmp( psz_parser, option "=", strlen(option "=") ) )           \
 714     {                                                                       \
 715         val.b_bool = strtol( psz_parser + strlen(option "="), &psz_parser,  \
 716                              0 );                                           \
 717         var_Set( p_access, "dvb-" option, val );                            \
 718     }
 719
 720     /* Test for old syntax */
 721     strtol( psz_parser, &psz_next, 10 );
 722     if( psz_next != psz_parser )
 723     {
 724         msg_Err( p_access, "the DVB input old syntax is deprecated, use vlc "
 725                           "-p dvb to see an explanation of the new syntax" );
 726         intf_UserFatal( p_access, VLC_TRUE, _("Input syntax is deprecated"),
 727             _("The given syntax is deprecated. Run \"vlc -p dvb\" to see an " \
 728                 "explanation of the new syntax.") );
 729         free( psz_dup );
 730         return VLC_EGENERIC;
 731     }
 732
 733     while( *psz_parser )
 734     {
 735         GET_OPTION_INT("adapter")
 736         else GET_OPTION_INT("device")
 737         else GET_OPTION_INT("frequency")
 738         else GET_OPTION_INT("inversion")
 739         else GET_OPTION_BOOL("probe")
 740         else GET_OPTION_BOOL("budget-mode")
 741
 742         else GET_OPTION_INT("voltage")
 743         else GET_OPTION_BOOL("high-voltage")
 744         else GET_OPTION_INT("tone")
 745         else GET_OPTION_INT("satno")
 746         else GET_OPTION_INT("fec")
 747         else GET_OPTION_INT("srate")
 748         else GET_OPTION_INT("lnb-lof1")
 749         else GET_OPTION_INT("lnb-lof2")
 750         else GET_OPTION_INT("lnb-slof")
 751
 752         else GET_OPTION_INT("modulation")
 753
 754         else GET_OPTION_INT("code-rate-hp")
 755         else GET_OPTION_INT("code-rate-lp")
 756         else GET_OPTION_INT("bandwidth")
 757         else GET_OPTION_INT("transmission")
 758         else GET_OPTION_INT("guard")
 759         else GET_OPTION_INT("hierarchy")
 760
 761         /* Redundant with voltage but much easier to use */
 762         else if( !strncmp( psz_parser, "polarization=",
 763                            strlen( "polarization=" ) ) )
 764         {
 765             psz_parser += strlen( "polarization=" );
 766             if ( *psz_parser == 'V' || *psz_parser == 'v' )
 767                 val.i_int = 13;
 768             else if ( *psz_parser == 'H' || *psz_parser == 'h' )
 769                 val.i_int = 18;
 770             else
 771             {
 772                 msg_Err( p_access, "illegal polarization %c", *psz_parser );
 773                 intf_UserFatal( p_access, VLC_FALSE, _("Illegal Polarization"),
 774                                 _("The provided polarization \"%c\" is not valid."),
 775                                 *psz_parser );
 776                 free( psz_dup );
 777                 return VLC_EGENERIC;
 778             }
 779             var_Set( p_access, "dvb-voltage", val );
 780         }
 781         else
 782         {
 783             msg_Err( p_access, "unknown option (%s)", psz_parser );
 784             free( psz_dup );
 785             return VLC_EGENERIC;
 786         }
 787
 788         if ( *psz_parser )
 789             psz_parser++;
 790     }
 791 #undef GET_OPTION_INT
 792 #undef GET_OPTION_BOOL
 793
 794     free( psz_dup );
 795     return VLC_SUCCESS;
 796 }
 797