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