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