1 /*****************************************************************************
2 * access.c: DVB card input v4l2 only
3 *****************************************************************************
4 * Copyright (C) 1998-2004 VideoLAN (Centrale Réseaux) and its contributors
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>
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.
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.
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 *****************************************************************************/
27 /*****************************************************************************
29 *****************************************************************************/
31 #include <vlc/input.h>
38 #include <sys/types.h>
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>
52 # include "descriptor.h"
53 # include "tables/pat.h"
54 # include "tables/pmt.h"
55 # include "descriptors/dr.h"
61 /*****************************************************************************
63 *****************************************************************************/
64 static int Open( vlc_object_t *p_this );
65 static void Close( vlc_object_t *p_this );
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." )
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.")
75 #define DEVICE_TEXT N_("Device number to use on adapter")
76 #define DEVICE_LONGTEXT ""
78 #define FREQ_TEXT N_("Transponder/multiplex frequency")
79 #define FREQ_LONGTEXT N_("In kHz for DVB-S or Hz for DVB-C/T")
81 #define INVERSION_TEXT N_("Inversion mode")
82 #define INVERSION_LONGTEXT N_("Inversion mode [0=off, 1=on, 2=auto]")
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.")
87 #define LNB_LOF1_TEXT N_("Antenna lnb_lof1 (kHz)")
88 #define LNB_LOF1_LONGTEXT ""
90 #define LNB_LOF2_TEXT N_("Antenna lnb_lof2 (kHz)")
91 #define LNB_LOF2_LONGTEXT ""
93 #define LNB_SLOF_TEXT N_("Antenna lnb_slof (kHz)")
94 #define LNB_SLOF_LONGTEXT ""
97 #define BUDGET_TEXT N_("Budget mode")
98 #define BUDGET_LONGTEXT N_("This allows you to stream an entire transponder with a budget card.")
100 #define SATNO_TEXT N_("Satellite number in the Diseqc system")
101 #define SATNO_LONGTEXT N_("[0=no diseqc, 1-4=satellite number]")
103 #define VOLTAGE_TEXT N_("LNB voltage")
104 #define VOLTAGE_LONGTEXT N_("In Volts [0, 13=vertical, 18=horizontal]")
106 #define HIGH_VOLTAGE_TEXT N_("High LNB voltage")
107 #define HIGH_VOLTAGE_LONGTEXT N_("Enable high voltage if your cables are " \
108 "particularly long. This is not supported by all frontends.")
110 #define TONE_TEXT N_("22 kHz tone")
111 #define TONE_LONGTEXT N_("[0=off, 1=on, -1=auto]")
113 #define FEC_TEXT N_("Transponder FEC")
114 #define FEC_LONGTEXT N_("FEC=Forward Error Correction mode [9=auto]")
116 #define SRATE_TEXT N_("Transponder symbol rate in kHz")
117 #define SRATE_LONGTEXT ""
120 #define MODULATION_TEXT N_("Modulation type")
121 #define MODULATION_LONGTEXT N_("Modulation type for front-end device.")
124 #define CODE_RATE_HP_TEXT N_("Terrestrial high priority stream code rate (FEC)")
125 #define CODE_RATE_HP_LONGTEXT ""
127 #define CODE_RATE_LP_TEXT N_("Terrestrial low priority stream code rate (FEC)")
128 #define CODE_RATE_LP_LONGTEXT ""
130 #define BANDWIDTH_TEXT N_("Terrestrial bandwidth")
131 #define BANDWIDTH_LONGTEXT N_("Terrestrial bandwidth [0=auto,6,7,8 in MHz]")
133 #define GUARD_TEXT N_("Terrestrial guard interval")
134 #define GUARD_LONGTEXT ""
136 #define TRANSMISSION_TEXT N_("Terrestrial transmission mode")
137 #define TRANSMISSION_LONGTEXT ""
139 #define HIERARCHY_TEXT N_("Terrestrial hierarchy mode")
140 #define HIERARCHY_LONGTEXT ""
143 set_shortname( _("DVB") );
144 set_description( N_("DVB input with v4l2 support") );
145 set_category( CAT_INPUT );
146 set_subcategory( SUBCAT_INPUT_ACCESS );
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,
152 add_integer( "dvb-device", 0, NULL, DEVICE_TEXT, DEVICE_LONGTEXT,
154 add_integer( "dvb-frequency", 11954000, NULL, FREQ_TEXT, FREQ_LONGTEXT,
156 add_integer( "dvb-inversion", 2, NULL, INVERSION_TEXT, INVERSION_LONGTEXT,
158 add_bool( "dvb-probe", 1, NULL, PROBE_TEXT, PROBE_LONGTEXT, VLC_TRUE );
159 add_integer( "dvb-lnb-lof1", 9750000, NULL, LNB_LOF1_TEXT,
160 LNB_LOF1_LONGTEXT, VLC_TRUE );
161 add_integer( "dvb-lnb-lof2", 10600000, NULL, LNB_LOF2_TEXT,
162 LNB_LOF2_LONGTEXT, VLC_TRUE );
163 add_integer( "dvb-lnb-slof", 11700000, NULL, LNB_SLOF_TEXT,
164 LNB_SLOF_LONGTEXT, VLC_TRUE );
165 /* DVB-S (satellite) */
166 add_bool( "dvb-budget-mode", 0, NULL, BUDGET_TEXT, BUDGET_LONGTEXT,
168 add_integer( "dvb-satno", 0, NULL, SATNO_TEXT, SATNO_LONGTEXT,
170 add_integer( "dvb-voltage", 13, NULL, VOLTAGE_TEXT, VOLTAGE_LONGTEXT,
172 add_bool( "dvb-high-voltage", 0, NULL, HIGH_VOLTAGE_TEXT,
173 HIGH_VOLTAGE_LONGTEXT, VLC_TRUE );
174 add_integer( "dvb-tone", -1, NULL, TONE_TEXT, TONE_LONGTEXT,
176 add_integer( "dvb-fec", 9, NULL, FEC_TEXT, FEC_LONGTEXT, VLC_TRUE );
177 add_integer( "dvb-srate", 27500000, NULL, SRATE_TEXT, SRATE_LONGTEXT,
179 /* DVB-T (terrestrial) */
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,
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,
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 );
208 /*****************************************************************************
210 *****************************************************************************/
211 static block_t *Block( access_t * );
212 static int Control( access_t *, int, va_list );
214 #define DVB_READ_ONCE 20
215 #define DVB_READ_ONCE_START 2
216 #define TS_PACKET_SIZE 188
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 );
222 static void VarInit( access_t * );
223 static int ParseMRL( access_t * );
226 /*****************************************************************************
227 * Open: open the frontend device
228 *****************************************************************************/
229 static int Open( vlc_object_t *p_this )
231 access_t *p_access = (access_t*)p_this;
234 /* Only if selected */
235 if( *p_access->psz_access == '\0' )
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;
250 p_access->p_sys = p_sys = malloc( sizeof( access_sys_t ) );
251 memset( p_sys, 0, sizeof( access_sys_t ) );
253 /* Create all variables */
256 /* Parse the command line */
257 if( ParseMRL( p_access ) )
263 /* Getting frontend info */
264 if( E_(FrontendOpen)( p_access) )
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 )
274 E_(FrontendClose)( p_access );
279 /* Opening DVR device */
280 if( E_(DVROpen)( p_access ) < 0 )
282 E_(FrontendClose)( p_access );
287 p_sys->b_budget_mode = var_GetBool( p_access, "dvb-budget-mode" );
288 if( p_sys->b_budget_mode )
290 msg_Dbg( p_access, "setting filter on all PIDs" );
291 FilterSet( p_access, 0x2000, OTHER_TYPE );
295 msg_Dbg( p_access, "setting filter on PAT" );
296 FilterSet( p_access, 0x0, OTHER_TYPE );
299 E_(CAMOpen)( p_access );
301 if( p_sys->b_budget_mode )
302 p_sys->i_read_once = DVB_READ_ONCE;
304 p_sys->i_read_once = DVB_READ_ONCE_START;
309 /*****************************************************************************
310 * Close : Close the device
311 *****************************************************************************/
312 static void Close( vlc_object_t *p_this )
314 access_t *p_access = (access_t*)p_this;
315 access_sys_t *p_sys = p_access->p_sys;
317 FilterUnset( p_access, p_sys->b_budget_mode ? 1 : MAX_DEMUX );
319 E_(DVRClose)( p_access );
320 E_(FrontendClose)( p_access );
321 E_(CAMClose)( p_access );
326 /*****************************************************************************
328 *****************************************************************************/
329 static block_t *Block( access_t *p_access )
331 access_sys_t *p_sys = p_access->p_sys;
336 struct timeval timeout;
339 int i_max_handle = p_sys->i_handle;
341 /* Initialize file descriptor sets */
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;
349 /* We'll wait 0.5 second if nothing happens */
351 timeout.tv_usec = 500000;
353 /* Find if some data is available */
354 i_ret = select( i_max_handle + 1, &fds, NULL, &fde, &timeout );
356 if ( p_access->b_die )
359 if ( i_ret < 0 && errno == EINTR )
364 msg_Err( p_access, "select error (%s)", strerror(errno) );
368 if ( p_sys->i_ca_handle && mdate() > p_sys->i_ca_next_event )
370 E_(CAMPoll)( p_access );
371 p_sys->i_ca_next_event = mdate() + p_sys->i_ca_timeout;
374 if ( FD_ISSET( p_sys->i_frontend_handle, &fde ) )
376 E_(FrontendPoll)( p_access );
379 if ( p_sys->i_frontend_timeout && mdate() > p_sys->i_frontend_timeout )
381 msg_Warn( p_access, "no lock, tuning again" );
382 E_(FrontendSet)( p_access );
385 if ( FD_ISSET( p_sys->i_handle, &fds ) )
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 )
395 msg_Err( p_access, "read failed (%s)", strerror(errno) );
396 block_Release( p_block );
400 if( p_sys->i_read_once < DVB_READ_ONCE )
401 p_sys->i_read_once++;
406 /*****************************************************************************
408 *****************************************************************************/
409 static int Control( access_t *p_access, int i_query, va_list args )
411 access_sys_t *p_sys = p_access->p_sys;
412 vlc_bool_t *pb_bool, b_bool;
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;
428 pi_int = (int*)va_arg( args, int * );
429 *pi_int = DVB_READ_ONCE * TS_PACKET_SIZE;
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;
438 case ACCESS_SET_PAUSE_STATE:
439 case ACCESS_GET_TITLE_INFO:
440 case ACCESS_SET_TITLE:
441 case ACCESS_SET_SEEKPOINT:
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 )
449 /* FIXME we may want to give the real type (me ?, I don't ;) */
451 FilterSet( p_access, i_int, OTHER_TYPE );
453 FilterUnsetPID( p_access, i_int );
457 case ACCESS_SET_PRIVATE_ID_CA:
461 p_pmt = (dvbpsi_pmt_t *)va_arg( args, dvbpsi_pmt_t * );
463 E_(CAMSet)( p_access, p_pmt );
468 msg_Warn( p_access, "unimplemented query in control" );
475 /*****************************************************************************
476 * FilterSet/FilterUnset:
477 *****************************************************************************/
478 static void FilterSet( access_t *p_access, int i_pid, int i_type )
480 access_sys_t *p_sys = p_access->p_sys;
483 /* Find first free slot */
484 for( i = 0; i < MAX_DEMUX; i++ )
486 if( !p_sys->p_demux_handles[i].i_type )
489 if( p_sys->p_demux_handles[i].i_pid == i_pid )
490 return; /* Already set */
495 msg_Err( p_access, "no free p_demux_handles !" );
499 if( E_(DMXSetFilter)( p_access, i_pid,
500 &p_sys->p_demux_handles[i].i_handle, i_type ) )
502 msg_Err( p_access, "DMXSetFilter failed" );
505 p_sys->p_demux_handles[i].i_type = i_type;
506 p_sys->p_demux_handles[i].i_pid = i_pid;
508 if( p_sys->i_read_once < DVB_READ_ONCE )
509 p_sys->i_read_once++;
512 static void FilterUnset( access_t *p_access, int i_max )
514 access_sys_t *p_sys = p_access->p_sys;
517 for( i = 0; i < i_max; i++ )
519 if( p_sys->p_demux_handles[i].i_type )
521 E_(DMXUnsetFilter)( p_access, p_sys->p_demux_handles[i].i_handle );
522 p_sys->p_demux_handles[i].i_type = 0;
527 static void FilterUnsetPID( access_t *p_access, int i_pid )
529 access_sys_t *p_sys = p_access->p_sys;
532 for( i = 0; i < MAX_DEMUX; i++ )
534 if( p_sys->p_demux_handles[i].i_type &&
535 p_sys->p_demux_handles[i].i_pid == i_pid )
537 E_(DMXUnsetFilter)( p_access, p_sys->p_demux_handles[i].i_handle );
538 p_sys->p_demux_handles[i].i_type = 0;
543 /*****************************************************************************
545 *****************************************************************************/
546 static void VarInit( access_t *p_access )
549 var_Create( p_access, "dvb-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
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-lnb-lof1", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
558 var_Create( p_access, "dvb-lnb-lof2", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
559 var_Create( p_access, "dvb-lnb-slof", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
562 var_Create( p_access, "dvb-budget-mode", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
563 var_Create( p_access, "dvb-satno", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
564 var_Create( p_access, "dvb-voltage", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
565 var_Create( p_access, "dvb-high-voltage", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
566 var_Create( p_access, "dvb-tone", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
567 var_Create( p_access, "dvb-fec", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
568 var_Create( p_access, "dvb-srate", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
571 var_Create( p_access, "dvb-modulation", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
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 );
583 static int ParseMRL( access_t *p_access )
585 char *psz_dup = strdup( p_access->psz_path );
586 char *psz_parser = psz_dup;
590 #define GET_OPTION_INT( option ) \
591 if ( !strncmp( psz_parser, option "=", strlen(option "=") ) ) \
593 val.i_int = strtol( psz_parser + strlen(option "="), &psz_parser, \
595 var_Set( p_access, "dvb-" option, val ); \
598 #define GET_OPTION_BOOL( option ) \
599 if ( !strncmp( psz_parser, option "=", strlen(option "=") ) ) \
601 val.b_bool = strtol( psz_parser + strlen(option "="), &psz_parser, \
603 var_Set( p_access, "dvb-" option, val ); \
606 /* Test for old syntax */
607 strtol( psz_parser, &psz_next, 10 );
608 if( psz_next != psz_parser )
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" );
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_INT("lnb-lof1")
624 else GET_OPTION_INT("lnb-lof2")
625 else GET_OPTION_INT("lnb-slof")
627 else GET_OPTION_BOOL("budget-mode")
628 else GET_OPTION_INT("voltage")
629 else GET_OPTION_BOOL("high-voltage")
630 else GET_OPTION_INT("tone")
631 else GET_OPTION_INT("satno")
632 else GET_OPTION_INT("fec")
633 else GET_OPTION_INT("srate")
635 else GET_OPTION_INT("modulation")
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")
644 /* Redundant with voltage but much easier to use */
645 else if( !strncmp( psz_parser, "polarization=",
646 strlen( "polarization=" ) ) )
648 psz_parser += strlen( "polarization=" );
649 if ( *psz_parser == 'V' || *psz_parser == 'v' )
651 else if ( *psz_parser == 'H' || *psz_parser == 'h' )
655 msg_Err( p_access, "illegal polarization %c", *psz_parser );
659 var_Set( p_access, "dvb-voltage", val );
663 msg_Err( p_access, "unknown option (%s)", psz_parser );
671 #undef GET_OPTION_INT
672 #undef GET_OPTION_BOOL