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