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