Added check against NIT dvbpsi support.
[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_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