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