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