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