1 /*****************************************************************************
2 * access.c: DVB card input v4l2 only
3 *****************************************************************************
4 * Copyright (C) 1998-2004 VideoLAN
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>
44 /*****************************************************************************
46 *****************************************************************************/
47 static int Open( vlc_object_t *p_this );
48 static void Close( vlc_object_t *p_this );
50 #define CACHING_TEXT N_("Caching value in ms")
51 #define CACHING_LONGTEXT N_( \
52 "Allows you to modify the default caching value for dvb streams. This " \
53 "value should be set in millisecond units." )
55 #define ADAPTER_TEXT N_("Adapter card to tune")
56 #define ADAPTER_LONGTEXT N_("Adapter cards have a device file in directory named /dev/dvb/adapter[n] with n>=0.")
58 #define DEVICE_TEXT N_("Device number to use on adapter")
59 #define DEVICE_LONGTEXT ""
61 #define CAM_TEXT N_("Use CAM")
62 #define CAM_LONGTEXT ""
64 #define FREQ_TEXT N_("Transponder/multiplex frequency")
65 #define FREQ_LONGTEXT N_("In kHz for DVB-S or Hz for DVB-C/T")
67 #define INVERSION_TEXT N_("Inversion mode")
68 #define INVERSION_LONGTEXT N_("Inversion mode [0=off, 1=on, 2=auto]")
70 #define PROBE_TEXT N_("Probe DVB card for capabilities")
71 #define PROBE_LONGTEXT N_("Some DVB cards do not like to be probed for their capabilities.")
73 #define LNB_LOF1_TEXT N_("Antenna lnb_lof1 (kHz)")
74 #define LNB_LOF1_LONGTEXT ""
76 #define LNB_LOF2_TEXT N_("Antenna lnb_lof2 (kHz)")
77 #define LNB_LOF2_LONGTEXT ""
79 #define LNB_SLOF_TEXT N_("Antenna lnb_slof (kHz)")
80 #define LNB_SLOF_LONGTEXT ""
83 #define BUDGET_TEXT N_("Budget mode")
84 #define BUDGET_LONGTEXT N_("This allows you to stream an entire transponder with a budget card.")
86 #define SATNO_TEXT N_("Satellite number in the Diseqc system")
87 #define SATNO_LONGTEXT N_("[0=no diseqc, 1-4=normal diseqc, -1=A, -2=B simple diseqc]")
89 #define VOLTAGE_TEXT N_("LNB voltage")
90 #define VOLTAGE_LONGTEXT N_("In Volts [0, 13=vertical, 18=horizontal]")
92 #define TONE_TEXT N_("22 kHz tone")
93 #define TONE_LONGTEXT N_("[0=off, 1=on, -1=auto]")
95 #define FEC_TEXT N_("Transponder FEC")
96 #define FEC_LONGTEXT N_("FEC=Forward Error Correction mode [9=auto]")
98 #define SRATE_TEXT N_("Transponder symbol rate in kHz")
99 #define SRATE_LONGTEXT ""
102 #define MODULATION_TEXT N_("Modulation type")
103 #define MODULATION_LONGTEXT N_("Modulation type for front-end device.")
106 #define CODE_RATE_HP_TEXT N_("Terrestrial high priority stream code rate (FEC)")
107 #define CODE_RATE_HP_LONGTEXT ""
109 #define CODE_RATE_LP_TEXT N_("Terrestrial low priority stream code rate (FEC)")
110 #define CODE_RATE_LP_LONGTEXT ""
112 #define BANDWIDTH_TEXT N_("Terrestrial bandwidth")
113 #define BANDWIDTH_LONGTEXT N_("Terrestrial bandwidth [0=auto,6,7,8 in MHz]")
115 #define GUARD_TEXT N_("Terrestrial guard interval")
116 #define GUARD_LONGTEXT ""
118 #define TRANSMISSION_TEXT N_("Terrestrial transmission mode")
119 #define TRANSMISSION_LONGTEXT ""
121 #define HIERARCHY_TEXT N_("Terrestrial hierarchy mode")
122 #define HIERARCHY_LONGTEXT ""
125 set_shortname( _("DVB") );
126 set_description( N_("DVB input with v4l2 support") );
128 add_integer( "dvb-caching", DEFAULT_PTS_DELAY / 1000, NULL, CACHING_TEXT,
129 CACHING_LONGTEXT, VLC_TRUE );
130 add_integer( "dvb-adapter", 0, NULL, ADAPTER_TEXT, ADAPTER_LONGTEXT,
132 add_integer( "dvb-device", 0, NULL, DEVICE_TEXT, DEVICE_LONGTEXT,
134 add_bool( "dvb-cam", 0, NULL, CAM_TEXT, CAM_LONGTEXT, VLC_FALSE );
135 add_integer( "dvb-frequency", 11954000, NULL, FREQ_TEXT, FREQ_LONGTEXT,
137 add_integer( "dvb-inversion", 2, NULL, INVERSION_TEXT, INVERSION_LONGTEXT,
139 add_bool( "dvb-probe", 1, NULL, PROBE_TEXT, PROBE_LONGTEXT, VLC_TRUE );
140 add_integer( "dvb-lnb-lof1", 9750000, NULL, LNB_LOF1_TEXT,
141 LNB_LOF1_LONGTEXT, VLC_TRUE );
142 add_integer( "dvb-lnb-lof2", 10600000, NULL, LNB_LOF2_TEXT,
143 LNB_LOF2_LONGTEXT, VLC_TRUE );
144 add_integer( "dvb-lnb-slof", 11700000, NULL, LNB_SLOF_TEXT,
145 LNB_SLOF_LONGTEXT, VLC_TRUE );
146 /* DVB-S (satellite) */
147 add_bool( "dvb-budget-mode", 0, NULL, BUDGET_TEXT, BUDGET_LONGTEXT,
149 add_integer( "dvb-satno", 0, NULL, SATNO_TEXT, SATNO_LONGTEXT,
151 add_integer( "dvb-voltage", 13, NULL, VOLTAGE_TEXT, VOLTAGE_LONGTEXT,
153 add_integer( "dvb-tone", -1, NULL, TONE_TEXT, TONE_LONGTEXT,
155 add_integer( "dvb-fec", 9, NULL, FEC_TEXT, FEC_LONGTEXT, VLC_TRUE );
156 add_integer( "dvb-srate", 27500000, NULL, SRATE_TEXT, SRATE_LONGTEXT,
158 /* DVB-T (terrestrial) */
159 add_integer( "dvb-modulation", 0, NULL, MODULATION_TEXT,
160 MODULATION_LONGTEXT, VLC_TRUE );
161 /* DVB-T (terrestrial) */
162 add_integer( "dvb-code-rate-hp", 9, NULL, CODE_RATE_HP_TEXT,
163 CODE_RATE_HP_LONGTEXT, VLC_TRUE );
164 add_integer( "dvb-code-rate-lp", 9, NULL, CODE_RATE_LP_TEXT,
165 CODE_RATE_LP_LONGTEXT, VLC_TRUE );
166 add_integer( "dvb-bandwidth", 0, NULL, BANDWIDTH_TEXT, BANDWIDTH_LONGTEXT,
168 add_integer( "dvb-guard", 0, NULL, GUARD_TEXT, GUARD_LONGTEXT, VLC_TRUE );
169 add_integer( "dvb-transmission", 0, NULL, TRANSMISSION_TEXT,
170 TRANSMISSION_LONGTEXT, VLC_TRUE );
171 add_integer( "dvb-hierarchy", 0, NULL, HIERARCHY_TEXT, HIERARCHY_LONGTEXT,
174 set_capability( "access2", 0 );
175 add_shortcut( "dvb" );
176 add_shortcut( "dvb-s" );
177 add_shortcut( "qpsk" );
178 add_shortcut( "dvb-c" );
179 add_shortcut( "cable" );
180 add_shortcut( "dvb-t" );
181 add_shortcut( "terrestrial" );
182 add_shortcut( "satellite" ); /* compatibility with the interface. */
183 set_callbacks( Open, Close );
187 /*****************************************************************************
189 *****************************************************************************/
190 static block_t *Block( access_t * );
191 static int Control( access_t *, int, va_list );
193 #define SATELLITE_READ_ONCE 3
194 #define TS_PACKET_SIZE 188
196 static void FilterUnset( access_t *, int i_max );
197 static void FilterUnsetPID( access_t *, int i_pid );
198 static void FilterSet( access_t *, int i_pid, int i_type );
200 static void VarInit( access_t * );
201 static int ParseMRL( access_t * );
204 /*****************************************************************************
205 * Open: open the frontend device
206 *****************************************************************************/
207 static int Open( vlc_object_t *p_this )
209 access_t *p_access = (access_t*)p_this;
212 /* Only if selected */
213 if( *p_access->psz_access == '\0' )
217 p_access->pf_read = NULL;
218 p_access->pf_block = Block;
219 p_access->pf_control = Control;
220 p_access->pf_seek = NULL;
221 p_access->info.i_update = 0;
222 p_access->info.i_size = 0;
223 p_access->info.i_pos = 0;
224 p_access->info.b_eof = VLC_FALSE;
225 p_access->info.i_title = 0;
226 p_access->info.i_seekpoint = 0;
228 p_access->p_sys = p_sys = malloc( sizeof( access_sys_t ) );
229 memset( p_sys, 0, sizeof( access_sys_t ) );
231 /* Create all variables */
234 /* Parse the command line */
235 if( ParseMRL( p_access ) )
241 /* Getting frontend info */
242 if( E_(FrontendOpen)( p_access) )
248 /* Setting frontend parameters for tuning the hardware */
249 msg_Dbg( p_access, "trying to tune the frontend...");
250 if( E_(FrontendSet)( p_access ) < 0 )
252 E_(FrontendClose)( p_access );
257 /* Opening DVR device */
258 if( E_(DVROpen)( p_access ) < 0 )
260 E_(FrontendClose)( p_access );
265 p_sys->b_budget_mode = var_GetBool( p_access, "dvb-budget-mode" );
266 if( p_sys->b_budget_mode )
268 msg_Dbg( p_access, "setting filter on all PIDs" );
269 FilterSet( p_access, 0x2000, OTHER_TYPE );
273 msg_Dbg( p_access, "setting filter on PAT" );
274 FilterSet( p_access, 0x0, OTHER_TYPE );
277 p_sys->b_cam = var_GetBool( p_access, "dvb-cam" );
280 msg_Dbg( p_access, "initing CAM..." );
281 if ( E_(CAMOpen)( p_access ) < 0 )
282 p_sys->b_cam = VLC_FALSE;
288 /*****************************************************************************
289 * Close : Close the device
290 *****************************************************************************/
291 static void Close( vlc_object_t *p_this )
293 access_t *p_access = (access_t*)p_this;
294 access_sys_t *p_sys = p_access->p_sys;
296 FilterUnset( p_access, p_sys->b_budget_mode ? 1 : MAX_DEMUX );
298 E_(DVRClose)( p_access );
299 E_(FrontendClose)( p_access );
302 E_(CAMClose)( p_access );
307 /*****************************************************************************
309 *****************************************************************************/
310 static block_t *Block( access_t *p_access )
312 access_sys_t *p_sys = p_access->p_sys;
313 struct timeval timeout;
318 /* Initialize file descriptor set */
320 FD_SET( p_sys->i_handle, &fds );
322 /* We'll wait 0.5 second if nothing happens */
324 timeout.tv_usec = 500000;
326 /* Find if some data is available */
327 while( (i_ret = select( p_sys->i_handle + 1, &fds, NULL, NULL, &timeout )) == 0 ||
328 (i_ret < 0 && errno == EINTR) )
331 FD_SET( p_sys->i_handle, &fds );
333 timeout.tv_usec = 500000;
335 if( p_access->b_die )
341 msg_Err( p_access, "select error (%s)", strerror(errno) );
345 p_block = block_New( p_access, SATELLITE_READ_ONCE * TS_PACKET_SIZE );
346 if( ( p_block->i_buffer = read( p_sys->i_handle, p_block->p_buffer, SATELLITE_READ_ONCE * TS_PACKET_SIZE ) ) <= 0 )
348 msg_Err( p_access, "read failed (%s)", strerror(errno) );
349 block_Release( p_block );
356 /*****************************************************************************
358 *****************************************************************************/
359 static int Control( access_t *p_access, int i_query, va_list args )
361 access_sys_t *p_sys = p_access->p_sys;
362 vlc_bool_t *pb_bool, b_bool;
369 case ACCESS_CAN_SEEK:
370 case ACCESS_CAN_FASTSEEK:
371 case ACCESS_CAN_PAUSE:
372 case ACCESS_CAN_CONTROL_PACE:
373 pb_bool = (vlc_bool_t*)va_arg( args, vlc_bool_t* );
374 *pb_bool = VLC_FALSE;
378 pi_int = (int*)va_arg( args, int * );
379 *pi_int = SATELLITE_READ_ONCE * TS_PACKET_SIZE;
382 case ACCESS_GET_PTS_DELAY:
383 pi_64 = (int64_t*)va_arg( args, int64_t * );
384 *pi_64 = var_GetInteger( p_access, "dvb-caching" ) * 1000;
388 case ACCESS_SET_PAUSE_STATE:
389 case ACCESS_GET_TITLE_INFO:
390 case ACCESS_SET_TITLE:
391 case ACCESS_SET_SEEKPOINT:
394 case ACCESS_SET_PRIVATE_ID_STATE:
395 i_int = (int)va_arg( args, int ); /* Private data (pid for now)*/
396 b_bool = (vlc_bool_t)va_arg( args, vlc_bool_t ); /* b_selected */
397 if( !p_sys->b_budget_mode )
399 /* FIXME we may want to give the real type (me ?, I don't ;) */
401 FilterSet( p_access, i_int, OTHER_TYPE );
403 FilterUnsetPID( p_access, i_int );
407 case ACCESS_SET_PRIVATE_ID_CA:
411 uint16_t i_vpid, i_apid1, i_apid2, i_apid3;
412 uint8_t i_cad_length;
415 i_program = (int)va_arg( args, int );
416 i_vpid = (int16_t)va_arg( args, int );
417 i_apid1 = (uint16_t)va_arg( args, int );
418 i_apid2 = (uint16_t)va_arg( args, int );
419 i_apid3 = (uint16_t)va_arg( args, int );
420 i_cad_length = (uint8_t)va_arg( args, int );
421 p_cad = (uint8_t *)va_arg( args, uint8_t * );
423 E_(CAMSet)( p_access, i_program, i_vpid, i_apid1, i_apid2,
424 i_apid3, i_cad_length, p_cad );
429 msg_Warn( p_access, "unimplemented query in control" );
436 /*****************************************************************************
437 * FilterSet/FilterUnset:
438 *****************************************************************************/
439 static void FilterSet( access_t *p_access, int i_pid, int i_type )
441 access_sys_t *p_sys = p_access->p_sys;
444 /* Find first free slot */
445 for( i = 0; i < MAX_DEMUX; i++ )
447 if( !p_sys->p_demux_handles[i].i_type )
450 if( p_sys->p_demux_handles[i].i_pid == i_pid )
451 return; /* Already set */
456 msg_Err( p_access, "no free p_demux_handles !" );
460 if( E_(DMXSetFilter)( p_access, i_pid,
461 &p_sys->p_demux_handles[i].i_handle, i_type ) )
463 msg_Err( p_access, "DMXSetFilter failed" );
466 p_sys->p_demux_handles[i].i_type = i_type;
467 p_sys->p_demux_handles[i].i_pid = i_pid;
470 static void FilterUnset( access_t *p_access, int i_max )
472 access_sys_t *p_sys = p_access->p_sys;
475 for( i = 0; i < i_max; i++ )
477 if( p_sys->p_demux_handles[i].i_type )
479 E_(DMXUnsetFilter)( p_access, p_sys->p_demux_handles[i].i_handle );
480 p_sys->p_demux_handles[i].i_type = 0;
485 static void FilterUnsetPID( access_t *p_access, int i_pid )
487 access_sys_t *p_sys = p_access->p_sys;
490 for( i = 0; i < MAX_DEMUX; i++ )
492 if( p_sys->p_demux_handles[i].i_type &&
493 p_sys->p_demux_handles[i].i_pid == i_pid )
495 E_(DMXUnsetFilter)( p_access, p_sys->p_demux_handles[i].i_handle );
496 p_sys->p_demux_handles[i].i_type = 0;
501 /*****************************************************************************
503 *****************************************************************************/
504 static void VarInit( access_t *p_access )
507 var_Create( p_access, "dvb-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
510 var_Create( p_access, "dvb-adapter", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
511 var_Create( p_access, "dvb-device", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
512 var_Create( p_access, "dvb-cam", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
513 var_Create( p_access, "dvb-frequency", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
514 var_Create( p_access, "dvb-inversion", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
515 var_Create( p_access, "dvb-probe", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
516 var_Create( p_access, "dvb-lnb-lof1", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
517 var_Create( p_access, "dvb-lnb-lof2", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
518 var_Create( p_access, "dvb-lnb-slof", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
521 var_Create( p_access, "dvb-budget-mode", VLC_VAR_BOOL | VLC_VAR_DOINHERIT );
522 var_Create( p_access, "dvb-satno", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
523 var_Create( p_access, "dvb-voltage", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
524 var_Create( p_access, "dvb-tone", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
525 var_Create( p_access, "dvb-fec", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
526 var_Create( p_access, "dvb-srate", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
529 var_Create( p_access, "dvb-modulation", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
532 var_Create( p_access, "dvb-code-rate-hp", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
533 var_Create( p_access, "dvb-code-rate-lp", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
534 var_Create( p_access, "dvb-bandwidth", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
535 var_Create( p_access, "dvb-transmission", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
536 var_Create( p_access, "dvb-guard", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
537 var_Create( p_access, "dvb-hierarchy", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
541 static int ParseMRL( access_t *p_access )
543 char *psz_dup = strdup( p_access->psz_path );
544 char *psz_parser = psz_dup;
548 #define GET_OPTION_INT( option ) \
549 if ( !strncmp( psz_parser, option "=", strlen(option "=") ) ) \
551 val.i_int = strtol( psz_parser + strlen(option "="), &psz_parser, \
553 var_Set( p_access, "dvb-" option, val ); \
556 #define GET_OPTION_BOOL( option ) \
557 if ( !strncmp( psz_parser, option "=", strlen(option "=") ) ) \
559 val.b_bool = strtol( psz_parser + strlen(option "="), &psz_parser, \
561 var_Set( p_access, "dvb-" option, val ); \
564 /* Test for old syntax */
565 strtol( psz_parser, &psz_next, 10 );
566 if( psz_next != psz_parser )
568 msg_Err( p_access, "the DVB input old syntax is deprecated, use vlc "
569 "-p dvb to see an explanation of the new syntax" );
576 GET_OPTION_INT("adapter")
577 else GET_OPTION_INT("device")
578 else GET_OPTION_BOOL("cam")
579 else GET_OPTION_INT("frequency")
580 else GET_OPTION_INT("inversion")
581 else GET_OPTION_BOOL("probe")
582 else GET_OPTION_INT("lnb-lof1")
583 else GET_OPTION_INT("lnb-lof2")
584 else GET_OPTION_INT("lnb-slof")
586 else GET_OPTION_BOOL("budget-mode")
587 else GET_OPTION_INT("voltage")
588 else GET_OPTION_INT("tone")
589 else GET_OPTION_INT("fec")
590 else GET_OPTION_INT("srate")
592 else GET_OPTION_INT("modulation")
594 else GET_OPTION_INT("code-rate-hp")
595 else GET_OPTION_INT("code-rate-lp")
596 else GET_OPTION_INT("bandwidth")
597 else GET_OPTION_INT("transmission")
598 else GET_OPTION_INT("guard")
599 else GET_OPTION_INT("hierarchy")
601 else if( !strncmp( psz_parser, "satno=",
602 strlen( "satno=" ) ) )
604 psz_parser += strlen( "satno=" );
605 if ( *psz_parser == 'A' || *psz_parser == 'a' )
607 else if ( *psz_parser == 'B' || *psz_parser == 'b' )
610 val.i_int = strtol( psz_parser, &psz_parser, 0 );
611 var_Set( p_access, "dvb-satno", val );
613 /* Redundant with voltage but much easier to use */
614 else if( !strncmp( psz_parser, "polarization=",
615 strlen( "polarization=" ) ) )
617 psz_parser += strlen( "polarization=" );
618 if ( *psz_parser == 'V' || *psz_parser == 'v' )
620 else if ( *psz_parser == 'H' || *psz_parser == 'h' )
624 msg_Err( p_access, "illegal polarization %c", *psz_parser );
628 var_Set( p_access, "dvb-voltage", val );
632 msg_Err( p_access, "unknown option (%s)", psz_parser );
640 #undef GET_OPTION_INT
641 #undef GET_OPTION_BOOL