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