1 /*****************************************************************************
2 * linux_dvb.c : functions to control a DVB card under Linux with v4l2
3 *****************************************************************************
4 * Copyright (C) 1998-2005 the VideoLAN team
6 * Authors: Damien Lucas <nitrox@via.ecp.fr>
7 * Johan Bilien <jobi@via.ecp.fr>
8 * Jean-Paul Saman <jpsaman _at_ videolan _dot_ org>
9 * Christopher Ross <chris@tebibyte.org>
10 * Christophe Massiot <massiot@via.ecp.fr>
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 of the License, or
15 * (at your option) any later version.
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU General Public License for more details.
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software
24 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
25 *****************************************************************************/
28 #include <vlc_access.h>
29 #include <sys/ioctl.h>
32 #include <sys/types.h>
40 /* DVB Card Drivers */
41 #include <linux/dvb/version.h>
42 #include <linux/dvb/dmx.h>
43 #include <linux/dvb/frontend.h>
44 #include <linux/dvb/ca.h>
46 /* Include dvbpsi headers */
47 #ifdef HAVE_DVBPSI_DR_H
48 # include <dvbpsi/dvbpsi.h>
49 # include <dvbpsi/descriptor.h>
50 # include <dvbpsi/pat.h>
51 # include <dvbpsi/pmt.h>
52 # include <dvbpsi/dr.h>
53 # include <dvbpsi/psi.h>
56 # include "descriptor.h"
57 # include "tables/pat.h"
58 # include "tables/pmt.h"
59 # include "descriptors/dr.h"
64 # include "vlc_httpd.h"
74 fe_status_t i_last_status;
75 struct dvb_frontend_info info;
78 #define FRONTEND_LOCK_TIMEOUT 10000000 /* 10 s */
80 /* Local prototypes */
81 static int FrontendInfo( access_t * );
82 static int FrontendSetQPSK( access_t * );
83 static int FrontendSetQAM( access_t * );
84 static int FrontendSetOFDM( access_t * );
85 static int FrontendSetATSC( access_t * );
87 /*****************************************************************************
88 * FrontendOpen : Determine frontend device information and capabilities
89 *****************************************************************************/
90 int E_(FrontendOpen)( access_t *p_access )
92 access_sys_t *p_sys = p_access->p_sys;
93 frontend_t * p_frontend;
94 unsigned int i_adapter, i_device;
98 i_adapter = var_GetInteger( p_access, "dvb-adapter" );
99 i_device = var_GetInteger( p_access, "dvb-device" );
100 b_probe = var_GetBool( p_access, "dvb-probe" );
102 if( snprintf( frontend, sizeof(frontend), FRONTEND, i_adapter, i_device ) >= (int)sizeof(frontend) )
104 msg_Err( p_access, "snprintf() truncated string for FRONTEND" );
105 frontend[sizeof(frontend) - 1] = '\0';
108 p_sys->p_frontend = p_frontend = malloc( sizeof(frontend_t) );
110 msg_Dbg( p_access, "Opening device %s", frontend );
111 if( (p_sys->i_frontend_handle = open(frontend, O_RDWR | O_NONBLOCK)) < 0 )
113 msg_Err( p_access, "FrontEndOpen: opening device failed (%m)" );
120 const char * psz_expected = NULL;
121 const char * psz_real;
123 if( FrontendInfo( p_access ) < 0 )
125 close( p_sys->i_frontend_handle );
130 switch( p_frontend->info.type )
145 psz_real = "unknown";
149 if( (!strncmp( p_access->psz_access, "qpsk", 4 ) ||
150 !strncmp( p_access->psz_access, "dvb-s", 5 ) ||
151 !strncmp( p_access->psz_access, "satellite", 9 ) ) &&
152 (p_frontend->info.type != FE_QPSK) )
154 psz_expected = "DVB-S";
156 if( (!strncmp( p_access->psz_access, "cable", 5 ) ||
157 !strncmp( p_access->psz_access, "dvb-c", 5 ) ) &&
158 (p_frontend->info.type != FE_QAM) )
160 psz_expected = "DVB-C";
162 if( (!strncmp( p_access->psz_access, "terrestrial", 11 ) ||
163 !strncmp( p_access->psz_access, "dvb-t", 5 ) ) &&
164 (p_frontend->info.type != FE_OFDM) )
166 psz_expected = "DVB-T";
169 if( (!strncmp( p_access->psz_access, "usdigital", 9 ) ||
170 !strncmp( p_access->psz_access, "atsc", 4 ) ) &&
171 (p_frontend->info.type != FE_ATSC) )
173 psz_expected = "ATSC";
176 if( psz_expected != NULL )
178 msg_Err( p_access, "the user asked for %s, and the tuner is %s",
179 psz_expected, psz_real );
180 close( p_sys->i_frontend_handle );
185 else /* no frontend probing is done so use default border values. */
187 msg_Dbg( p_access, "using default values for frontend info" );
189 msg_Dbg( p_access, "method of access is %s", p_access->psz_access );
190 p_frontend->info.type = FE_QPSK;
191 if( !strncmp( p_access->psz_access, "qpsk", 4 ) ||
192 !strncmp( p_access->psz_access, "dvb-s", 5 ) )
193 p_frontend->info.type = FE_QPSK;
194 else if( !strncmp( p_access->psz_access, "cable", 5 ) ||
195 !strncmp( p_access->psz_access, "dvb-c", 5 ) )
196 p_frontend->info.type = FE_QAM;
197 else if( !strncmp( p_access->psz_access, "terrestrial", 11 ) ||
198 !strncmp( p_access->psz_access, "dvb-t", 5 ) )
199 p_frontend->info.type = FE_OFDM;
200 else if( !strncmp( p_access->psz_access, "usdigital", 9 ) ||
201 !strncmp( p_access->psz_access, "atsc", 4 ) )
202 p_frontend->info.type = FE_ATSC;
208 /*****************************************************************************
209 * FrontendClose : Close the frontend
210 *****************************************************************************/
211 void E_(FrontendClose)( access_t *p_access )
213 access_sys_t *p_sys = p_access->p_sys;
215 if( p_sys->p_frontend )
217 close( p_sys->i_frontend_handle );
218 free( p_sys->p_frontend );
220 p_sys->p_frontend = NULL;
224 /*****************************************************************************
225 * FrontendSet : Tune !
226 *****************************************************************************/
227 int E_(FrontendSet)( access_t *p_access )
229 access_sys_t *p_sys = p_access->p_sys;
231 switch( p_sys->p_frontend->info.type )
235 if( FrontendSetQPSK( p_access ) < 0 )
237 msg_Err( p_access, "DVB-S: tuning failed" );
244 if( FrontendSetQAM( p_access ) < 0 )
246 msg_Err( p_access, "DVB-C: tuning failed" );
253 if( FrontendSetOFDM( p_access ) < 0 )
255 msg_Err( p_access, "DVB-T: tuning failed" );
262 if( FrontendSetATSC( p_access ) < 0 )
264 msg_Err( p_access, "ATSC: tuning failed" );
270 msg_Err( p_access, "Could not determine frontend type on %s",
271 p_sys->p_frontend->info.name );
274 p_sys->p_frontend->i_last_status = 0;
275 p_sys->i_frontend_timeout = mdate() + FRONTEND_LOCK_TIMEOUT;
279 /*****************************************************************************
280 * FrontendPoll : Poll for frontend events
281 *****************************************************************************/
282 void E_(FrontendPoll)( access_t *p_access )
284 access_sys_t *p_sys = p_access->p_sys;
285 frontend_t * p_frontend = p_sys->p_frontend;
286 struct dvb_frontend_event event;
287 fe_status_t i_status, i_diff;
291 int i_ret = ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event );
295 if( errno == EWOULDBLOCK )
296 return; /* no more events */
298 msg_Err( p_access, "reading frontend event failed (%d): %m",
303 i_status = event.status;
304 i_diff = i_status ^ p_frontend->i_last_status;
305 p_frontend->i_last_status = i_status;
310 if ( i_diff & (x) ) \
312 if ( i_status & (x) )
314 IF_UP( FE_HAS_SIGNAL )
315 msg_Dbg( p_access, "frontend has acquired signal" );
317 msg_Dbg( p_access, "frontend has lost signal" );
319 IF_UP( FE_HAS_CARRIER )
320 msg_Dbg( p_access, "frontend has acquired carrier" );
322 msg_Dbg( p_access, "frontend has lost carrier" );
324 IF_UP( FE_HAS_VITERBI )
325 msg_Dbg( p_access, "frontend has acquired stable FEC" );
327 msg_Dbg( p_access, "frontend has lost FEC" );
330 msg_Dbg( p_access, "frontend has acquired sync" );
332 msg_Dbg( p_access, "frontend has lost sync" );
337 msg_Dbg( p_access, "frontend has acquired lock" );
338 p_sys->i_frontend_timeout = 0;
340 /* Read some statistics */
341 if( ioctl( p_sys->i_frontend_handle, FE_READ_BER, &i_value ) >= 0 )
342 msg_Dbg( p_access, "- Bit error rate: %d", i_value );
343 if( ioctl( p_sys->i_frontend_handle, FE_READ_SIGNAL_STRENGTH, &i_value ) >= 0 )
344 msg_Dbg( p_access, "- Signal strength: %d", i_value );
345 if( ioctl( p_sys->i_frontend_handle, FE_READ_SNR, &i_value ) >= 0 )
346 msg_Dbg( p_access, "- SNR: %d", i_value );
350 msg_Dbg( p_access, "frontend has lost lock" );
351 p_sys->i_frontend_timeout = mdate() + FRONTEND_LOCK_TIMEOUT;
356 /* The frontend was reinited. */
357 msg_Warn( p_access, "reiniting frontend");
358 E_(FrontendSet)( p_access );
366 /*****************************************************************************
367 * FrontendStatus : Read frontend status
368 *****************************************************************************/
369 void E_(FrontendStatus)( access_t *p_access )
371 access_sys_t *p_sys = p_access->p_sys;
372 frontend_t *p_frontend = p_sys->p_frontend;
373 char *p = p_sys->psz_frontend_info = malloc( 10000 );
374 fe_status_t i_status;
377 /* Determine type of frontend */
378 if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_GET_INFO,
379 &p_frontend->info )) < 0 )
382 strerror_r( errno, buf, sizeof( buf ) );
383 p += sprintf( p, "ioctl FE_GET_INFO failed (%d) %s\n", i_ret, buf );
387 /* Print out frontend capabilities. */
388 p += sprintf( p, "<table border=1><tr><th>name</th><td>%s</td></tr>\n",
389 p_frontend->info.name );
390 switch( p_frontend->info.type )
393 p += sprintf( p, "<tr><th>type</th><td>QPSK (DVB-S)</td></tr>\n" );
396 p += sprintf( p, "<tr><th>type</th><td>QAM (DVB-C)</td></tr>\n" );
399 p += sprintf( p, "<tr><th>type</th><td>OFDM (DVB-T)</td></tr>\n" );
401 #if 0 /* DVB_API_VERSION == 3 */
403 p += sprintf( p, "<tr><th>type</th><td>MEMORY</td></tr>\n" );
406 p += sprintf( p, "<tr><th>type</th><td>NETWORK</td></tr>\n" );
410 p += sprintf( p, "<tr><th>type</th><td>UNKNOWN (%d)</td></tr>\n",
411 p_frontend->info.type );
414 #define CHECK_INFO( x ) \
416 "<tr><th>" STRINGIFY(x) "</th><td>%u</td></tr>\n", \
417 p_frontend->info.x );
419 CHECK_INFO( frequency_min );
420 CHECK_INFO( frequency_max );
421 CHECK_INFO( frequency_stepsize );
422 CHECK_INFO( frequency_tolerance );
423 CHECK_INFO( symbol_rate_min );
424 CHECK_INFO( symbol_rate_max );
425 CHECK_INFO( symbol_rate_tolerance );
426 CHECK_INFO( notifier_delay );
429 p += sprintf( p, "</table><p>Frontend capability list:\n<table border=1>" );
431 #define CHECK_CAPS( x ) \
432 if ( p_frontend->info.caps & (FE_##x) ) \
433 p += sprintf( p, "<tr><td>" STRINGIFY(x) "</td></tr>\n" );
435 CHECK_CAPS( IS_STUPID );
436 CHECK_CAPS( CAN_INVERSION_AUTO );
437 CHECK_CAPS( CAN_FEC_1_2 );
438 CHECK_CAPS( CAN_FEC_2_3 );
439 CHECK_CAPS( CAN_FEC_3_4 );
440 CHECK_CAPS( CAN_FEC_4_5 );
441 CHECK_CAPS( CAN_FEC_5_6 );
442 CHECK_CAPS( CAN_FEC_6_7 );
443 CHECK_CAPS( CAN_FEC_7_8 );
444 CHECK_CAPS( CAN_FEC_8_9 );
445 CHECK_CAPS( CAN_FEC_AUTO );
446 CHECK_CAPS( CAN_QPSK );
447 CHECK_CAPS( CAN_QAM_16 );
448 CHECK_CAPS( CAN_QAM_32 );
449 CHECK_CAPS( CAN_QAM_64 );
450 CHECK_CAPS( CAN_QAM_128 );
451 CHECK_CAPS( CAN_QAM_256 );
452 CHECK_CAPS( CAN_QAM_AUTO );
453 CHECK_CAPS( CAN_TRANSMISSION_MODE_AUTO );
454 CHECK_CAPS( CAN_BANDWIDTH_AUTO );
455 CHECK_CAPS( CAN_GUARD_INTERVAL_AUTO );
456 CHECK_CAPS( CAN_HIERARCHY_AUTO );
457 CHECK_CAPS( CAN_MUTE_TS );
458 CHECK_CAPS( CAN_RECOVER );
459 #if 0 /* Disabled because of older distributions */
460 CHECK_CAPS( CAN_CLEAN_SETUP );
464 p += sprintf( p, "</table><p>Current frontend status:\n<table border=1>" );
466 if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_READ_STATUS, &i_status ))
470 strerror_r( errno, buf, sizeof( buf ) );
471 p += sprintf( p, "</table>ioctl FE_READ_STATUS failed (%d) %s\n",
476 #define CHECK_STATUS( x ) \
477 if ( i_status & (FE_##x) ) \
478 p += sprintf( p, "<tr><td>" STRINGIFY(x) "</td></tr>\n" );
480 CHECK_STATUS( HAS_SIGNAL );
481 CHECK_STATUS( HAS_CARRIER );
482 CHECK_STATUS( HAS_VITERBI );
483 CHECK_STATUS( HAS_SYNC );
484 CHECK_STATUS( HAS_LOCK );
485 CHECK_STATUS( REINIT );
487 p += sprintf( p, "<tr><td>Tuning failed</td></tr>\n" );
490 if ( i_status & FE_HAS_LOCK )
493 p += sprintf( p, "</table><p>Signal status:\n<table border=1>" );
494 if( ioctl( p_sys->i_frontend_handle, FE_READ_BER, &i_value ) >= 0 )
495 p += sprintf( p, "<tr><th>Bit error rate</th><td>%d</td></tr>\n",
497 if( ioctl( p_sys->i_frontend_handle, FE_READ_SIGNAL_STRENGTH,
499 p += sprintf( p, "<tr><th>Signal strength</th><td>%d</td></tr>\n",
501 if( ioctl( p_sys->i_frontend_handle, FE_READ_SNR, &i_value ) >= 0 )
502 p += sprintf( p, "<tr><th>SNR</th><td>%d</td></tr>\n",
505 p += sprintf( p, "</table>" );
508 vlc_mutex_lock( &p_sys->httpd_mutex );
509 p_sys->b_request_frontend_info = VLC_FALSE;
510 vlc_cond_signal( &p_sys->httpd_cond );
511 vlc_mutex_unlock( &p_sys->httpd_mutex );
515 /*****************************************************************************
516 * FrontendInfo : Return information about given frontend
517 *****************************************************************************/
518 static int FrontendInfo( access_t *p_access )
520 access_sys_t *p_sys = p_access->p_sys;
521 frontend_t *p_frontend = p_sys->p_frontend;
524 /* Determine type of frontend */
525 if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_GET_INFO,
526 &p_frontend->info )) < 0 )
528 msg_Err( p_access, "ioctl FE_GET_INFO failed (%d): %m", i_ret );
532 /* Print out frontend capabilities. */
533 msg_Dbg(p_access, "Frontend Info:" );
534 msg_Dbg(p_access, " name = %s", p_frontend->info.name );
535 switch( p_frontend->info.type )
538 msg_Dbg( p_access, " type = QPSK (DVB-S)" );
541 msg_Dbg( p_access, " type = QAM (DVB-C)" );
544 msg_Dbg( p_access, " type = OFDM (DVB-T)" );
547 msg_Dbg( p_access, " type = ATSC (USA)" );
549 #if 0 /* DVB_API_VERSION == 3 */
551 msg_Dbg(p_access, " type = MEMORY" );
554 msg_Dbg(p_access, " type = NETWORK" );
558 msg_Err( p_access, " unknown frontend type (%d)",
559 p_frontend->info.type );
562 msg_Dbg(p_access, " frequency_min = %u (kHz)",
563 p_frontend->info.frequency_min);
564 msg_Dbg(p_access, " frequency_max = %u (kHz)",
565 p_frontend->info.frequency_max);
566 msg_Dbg(p_access, " frequency_stepsize = %u",
567 p_frontend->info.frequency_stepsize);
568 msg_Dbg(p_access, " frequency_tolerance = %u",
569 p_frontend->info.frequency_tolerance);
570 msg_Dbg(p_access, " symbol_rate_min = %u (kHz)",
571 p_frontend->info.symbol_rate_min);
572 msg_Dbg(p_access, " symbol_rate_max = %u (kHz)",
573 p_frontend->info.symbol_rate_max);
574 msg_Dbg(p_access, " symbol_rate_tolerance (ppm) = %u",
575 p_frontend->info.symbol_rate_tolerance);
576 msg_Dbg(p_access, " notifier_delay (ms) = %u",
577 p_frontend->info.notifier_delay );
579 msg_Dbg(p_access, "Frontend Info capability list:");
580 if( p_frontend->info.caps & FE_IS_STUPID)
581 msg_Dbg(p_access, " no capabilities - frontend is stupid!");
582 if( p_frontend->info.caps & FE_CAN_INVERSION_AUTO)
583 msg_Dbg(p_access, " inversion auto");
584 if( p_frontend->info.caps & FE_CAN_FEC_1_2)
585 msg_Dbg(p_access, " forward error correction 1/2");
586 if( p_frontend->info.caps & FE_CAN_FEC_2_3)
587 msg_Dbg(p_access, " forward error correction 2/3");
588 if( p_frontend->info.caps & FE_CAN_FEC_3_4)
589 msg_Dbg(p_access, " forward error correction 3/4");
590 if( p_frontend->info.caps & FE_CAN_FEC_4_5)
591 msg_Dbg(p_access, " forward error correction 4/5");
592 if( p_frontend->info.caps & FE_CAN_FEC_5_6)
593 msg_Dbg(p_access, " forward error correction 5/6");
594 if( p_frontend->info.caps & FE_CAN_FEC_6_7)
595 msg_Dbg(p_access, " forward error correction 6/7");
596 if( p_frontend->info.caps & FE_CAN_FEC_7_8)
597 msg_Dbg(p_access, " forward error correction 7/8");
598 if( p_frontend->info.caps & FE_CAN_FEC_8_9)
599 msg_Dbg(p_access, " forward error correction 8/9");
600 if( p_frontend->info.caps & FE_CAN_FEC_AUTO)
601 msg_Dbg(p_access, " forward error correction auto");
602 if( p_frontend->info.caps & FE_CAN_QPSK)
603 msg_Dbg(p_access, " card can do QPSK");
604 if( p_frontend->info.caps & FE_CAN_QAM_16)
605 msg_Dbg(p_access, " card can do QAM 16");
606 if( p_frontend->info.caps & FE_CAN_QAM_32)
607 msg_Dbg(p_access, " card can do QAM 32");
608 if( p_frontend->info.caps & FE_CAN_QAM_64)
609 msg_Dbg(p_access, " card can do QAM 64");
610 if( p_frontend->info.caps & FE_CAN_QAM_128)
611 msg_Dbg(p_access, " card can do QAM 128");
612 if( p_frontend->info.caps & FE_CAN_QAM_256)
613 msg_Dbg(p_access, " card can do QAM 256");
614 if( p_frontend->info.caps & FE_CAN_QAM_AUTO)
615 msg_Dbg(p_access, " card can do QAM auto");
616 if( p_frontend->info.caps & FE_CAN_TRANSMISSION_MODE_AUTO)
617 msg_Dbg(p_access, " transmission mode auto");
618 if( p_frontend->info.caps & FE_CAN_BANDWIDTH_AUTO)
619 msg_Dbg(p_access, " bandwidth mode auto");
620 if( p_frontend->info.caps & FE_CAN_GUARD_INTERVAL_AUTO)
621 msg_Dbg(p_access, " guard interval mode auto");
622 if( p_frontend->info.caps & FE_CAN_HIERARCHY_AUTO)
623 msg_Dbg(p_access, " hierarchy mode auto");
624 if( p_frontend->info.caps & FE_CAN_MUTE_TS)
625 msg_Dbg(p_access, " card can mute TS");
626 if( p_frontend->info.caps & FE_CAN_RECOVER)
627 msg_Dbg(p_access, " card can recover from a cable unplug");
628 if( p_frontend->info.caps & FE_CAN_8VSB)
629 msg_Dbg(p_access, " card can do 8vsb");
630 if( p_frontend->info.caps & FE_CAN_16VSB)
631 msg_Dbg(p_access, " card can do 16vsb");
632 msg_Dbg(p_access, "End of capability list");
637 /*****************************************************************************
638 * Decoding the DVB parameters (common)
639 *****************************************************************************/
640 static fe_spectral_inversion_t DecodeInversion( access_t *p_access )
643 fe_spectral_inversion_t fe_inversion = 0;
645 var_Get( p_access, "dvb-inversion", &val );
646 msg_Dbg( p_access, "using inversion=%d", val.i_int );
650 case 0: fe_inversion = INVERSION_OFF; break;
651 case 1: fe_inversion = INVERSION_ON; break;
652 case 2: fe_inversion = INVERSION_AUTO; break;
654 msg_Dbg( p_access, "dvb has inversion not set, using auto");
655 fe_inversion = INVERSION_AUTO;
661 static fe_code_rate_t DecodeFEC( access_t *p_access, int i_val )
663 fe_code_rate_t fe_fec = FEC_NONE;
665 msg_Dbg( p_access, "using fec=%d", i_val );
669 case 0: fe_fec = FEC_NONE; break;
670 case 1: fe_fec = FEC_1_2; break;
671 case 2: fe_fec = FEC_2_3; break;
672 case 3: fe_fec = FEC_3_4; break;
673 case 4: fe_fec = FEC_4_5; break;
674 case 5: fe_fec = FEC_5_6; break;
675 case 6: fe_fec = FEC_6_7; break;
676 case 7: fe_fec = FEC_7_8; break;
677 case 8: fe_fec = FEC_8_9; break;
678 case 9: fe_fec = FEC_AUTO; break;
682 msg_Err( p_access, "argument has invalid FEC (%d)", i_val);
688 static fe_modulation_t DecodeModulationQAM( access_t *p_access )
690 switch( var_GetInteger( p_access, "dvb-modulation" ) )
692 case 0: return QAM_AUTO;
693 case 16: return QAM_16;
694 case 32: return QAM_32;
695 case 64: return QAM_64;
696 case 128: return QAM_128;
697 case 256: return QAM_256;
699 msg_Dbg( p_access, "QAM modulation not set, using auto");
703 static fe_modulation_t DecodeModulationOFDM( access_t *p_access )
705 switch( var_GetInteger( p_access, "dvb-modulation" ) )
707 case -1: return QPSK;
708 case 0: return QAM_AUTO;
709 case 16: return QAM_16;
710 case 32: return QAM_32;
711 case 64: return QAM_64;
712 case 128: return QAM_128;
713 case 256: return QAM_256;
715 msg_Dbg( p_access, "OFDM modulation not set, using QAM auto");
719 static fe_modulation_t DecodeModulationATSC( access_t *p_access )
721 switch( var_GetInteger( p_access, "dvb-modulation" ) )
723 case 8: return VSB_8;
724 case 16: return VSB_16;
726 msg_Dbg( p_access, "ATSC modulation not set, using VSB 8");
731 /*****************************************************************************
732 * FrontendSetQPSK : controls the FE device
733 *****************************************************************************/
734 static fe_sec_voltage_t DecodeVoltage( access_t *p_access )
737 fe_sec_voltage_t fe_voltage;
739 var_Get( p_access, "dvb-voltage", &val );
740 msg_Dbg( p_access, "using voltage=%d", val.i_int );
744 case 0: fe_voltage = SEC_VOLTAGE_OFF; break;
745 case 13: fe_voltage = SEC_VOLTAGE_13; break;
746 case 18: fe_voltage = SEC_VOLTAGE_18; break;
748 fe_voltage = SEC_VOLTAGE_OFF;
749 msg_Err( p_access, "argument has invalid voltage (%d)", val.i_int );
755 static fe_sec_tone_mode_t DecodeTone( access_t *p_access )
758 fe_sec_tone_mode_t fe_tone;
760 var_Get( p_access, "dvb-tone", &val );
761 msg_Dbg( p_access, "using tone=%d", val.i_int );
765 case 0: fe_tone = SEC_TONE_OFF; break;
766 case 1: fe_tone = SEC_TONE_ON; break;
768 fe_tone = SEC_TONE_OFF;
769 msg_Err( p_access, "argument has invalid tone mode (%d)", val.i_int);
777 struct dvb_diseqc_master_cmd cmd;
781 static int DoDiseqc( access_t *p_access )
783 access_sys_t *p_sys = p_access->p_sys;
785 int i_frequency, i_lnb_slof;
786 fe_sec_voltage_t fe_voltage;
787 fe_sec_tone_mode_t fe_tone;
790 var_Get( p_access, "dvb-frequency", &val );
791 i_frequency = val.i_int;
792 var_Get( p_access, "dvb-lnb-slof", &val );
793 i_lnb_slof = val.i_int;
795 var_Get( p_access, "dvb-tone", &val );
796 if( val.i_int == -1 /* auto */ )
798 if( i_frequency >= i_lnb_slof )
802 var_Set( p_access, "dvb-tone", val );
805 fe_voltage = DecodeVoltage( p_access );
806 fe_tone = DecodeTone( p_access );
808 /* Switch off continuous tone. */
809 if( (i_err = ioctl( p_sys->i_frontend_handle, FE_SET_TONE, SEC_TONE_OFF )) < 0 )
811 msg_Err( p_access, "ioctl FE_SET_TONE failed, tone=%s (%d) %m",
812 fe_tone == SEC_TONE_ON ? "on" : "off", i_err );
816 /* Configure LNB voltage. */
817 if( (i_err = ioctl( p_sys->i_frontend_handle, FE_SET_VOLTAGE, fe_voltage )) < 0 )
819 msg_Err( p_access, "ioctl FE_SET_VOLTAGE failed, voltage=%d (%d) %m",
824 var_Get( p_access, "dvb-high-voltage", &val );
825 if( (i_err = ioctl( p_sys->i_frontend_handle, FE_ENABLE_HIGH_LNB_VOLTAGE,
826 val.b_bool )) < 0 && val.b_bool )
829 "ioctl FE_ENABLE_HIGH_LNB_VOLTAGE failed, val=%d (%d) %m",
833 /* Wait for at least 15 ms. */
836 var_Get( p_access, "dvb-satno", &val );
837 if( val.i_int > 0 && val.i_int < 5 )
839 /* digital satellite equipment control,
840 * specification is available from http://www.eutelsat.com/
843 /* 1.x compatible equipment */
844 struct diseqc_cmd_t cmd = { {{0xe0, 0x10, 0x38, 0xf0, 0x00, 0x00}, 4}, 0 };
846 /* param: high nibble: reset bits, low nibble set bits,
847 * bits are: option, position, polarization, band
849 cmd.cmd.msg[3] = 0xf0 /* reset bits */
850 | (((val.i_int - 1) * 4) & 0xc)
851 | (fe_voltage == SEC_VOLTAGE_13 ? 0 : 2)
852 | (fe_tone == SEC_TONE_ON ? 1 : 0);
854 if( (i_err = ioctl( p_sys->i_frontend_handle, FE_DISEQC_SEND_MASTER_CMD,
857 msg_Err( p_access, "ioctl FE_SEND_MASTER_CMD failed (%d) %m",
862 msleep(15000 + cmd.wait * 1000);
864 /* A or B simple diseqc ("diseqc-compatible") */
865 if( (i_err = ioctl( p_sys->i_frontend_handle, FE_DISEQC_SEND_BURST,
866 ((val.i_int - 1) % 2) ? SEC_MINI_B : SEC_MINI_A )) < 0 )
868 msg_Err( p_access, "ioctl FE_SEND_BURST failed (%d) %m",
876 if( (i_err = ioctl( p_sys->i_frontend_handle, FE_SET_TONE, fe_tone )) < 0 )
878 msg_Err( p_access, "ioctl FE_SET_TONE failed, tone=%s (%d) %m",
879 fe_tone == SEC_TONE_ON ? "on" : "off", i_err );
887 static int FrontendSetQPSK( access_t *p_access )
889 access_sys_t *p_sys = p_access->p_sys;
890 struct dvb_frontend_parameters fep;
893 int i_frequency, i_lnb_slof = 0, i_lnb_lof1, i_lnb_lof2 = 0;
895 /* Prepare the fep structure */
896 var_Get( p_access, "dvb-frequency", &val );
897 i_frequency = val.i_int;
899 var_Get( p_access, "dvb-lnb-lof1", &val );
900 if ( val.i_int == 0 )
902 /* Automatic mode. */
903 if ( i_frequency >= 950000 && i_frequency <= 2150000 )
905 msg_Dbg( p_access, "frequency %d is in IF-band", i_frequency );
908 else if ( i_frequency >= 2500000 && i_frequency <= 2700000 )
910 msg_Dbg( p_access, "frequency %d is in S-band", i_frequency );
911 i_lnb_lof1 = 3650000;
913 else if ( i_frequency >= 3400000 && i_frequency <= 4200000 )
915 msg_Dbg( p_access, "frequency %d is in C-band (lower)",
917 i_lnb_lof1 = 5150000;
919 else if ( i_frequency >= 4500000 && i_frequency <= 4800000 )
921 msg_Dbg( p_access, "frequency %d is in C-band (higher)",
923 i_lnb_lof1 = 5950000;
925 else if ( i_frequency >= 10700000 && i_frequency <= 13250000 )
927 msg_Dbg( p_access, "frequency %d is in Ku-band",
929 i_lnb_lof1 = 9750000;
930 i_lnb_lof2 = 10600000;
931 i_lnb_slof = 11700000;
935 msg_Err( p_access, "frequency %d is out of any known band",
937 msg_Err( p_access, "specify dvb-lnb-lof1 manually for the local "
938 "oscillator frequency" );
941 val.i_int = i_lnb_lof1;
942 var_Set( p_access, "dvb-lnb-lof1", val );
943 val.i_int = i_lnb_lof2;
944 var_Set( p_access, "dvb-lnb-lof2", val );
945 val.i_int = i_lnb_slof;
946 var_Set( p_access, "dvb-lnb-slof", val );
950 i_lnb_lof1 = val.i_int;
951 var_Get( p_access, "dvb-lnb-lof2", &val );
952 i_lnb_lof2 = val.i_int;
953 var_Get( p_access, "dvb-lnb-slof", &val );
954 i_lnb_slof = val.i_int;
957 if( i_lnb_slof && i_frequency >= i_lnb_slof )
959 i_frequency -= i_lnb_lof2;
963 i_frequency -= i_lnb_lof1;
965 fep.frequency = i_frequency >= 0 ? i_frequency : -i_frequency;
967 fep.inversion = DecodeInversion( p_access );
969 var_Get( p_access, "dvb-srate", &val );
970 fep.u.qpsk.symbol_rate = val.i_int;
972 var_Get( p_access, "dvb-fec", &val );
973 fep.u.qpsk.fec_inner = DecodeFEC( p_access, val.i_int );
975 if( DoDiseqc( p_access ) < 0 )
980 /* Empty the event queue */
983 struct dvb_frontend_event event;
984 if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
985 && errno == EWOULDBLOCK )
989 /* Now send it all to the frontend device */
990 if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
992 msg_Err( p_access, "DVB-S: setting frontend failed (%d) %m", i_ret );
999 /*****************************************************************************
1000 * FrontendSetQAM : controls the FE device
1001 *****************************************************************************/
1002 static int FrontendSetQAM( access_t *p_access )
1004 access_sys_t *p_sys = p_access->p_sys;
1005 struct dvb_frontend_parameters fep;
1009 /* Prepare the fep structure */
1011 var_Get( p_access, "dvb-frequency", &val );
1012 fep.frequency = val.i_int;
1014 fep.inversion = DecodeInversion( p_access );
1016 var_Get( p_access, "dvb-srate", &val );
1017 fep.u.qam.symbol_rate = val.i_int;
1019 var_Get( p_access, "dvb-fec", &val );
1020 fep.u.qam.fec_inner = DecodeFEC( p_access, val.i_int );
1022 fep.u.qam.modulation = DecodeModulationQAM( p_access );
1024 /* Empty the event queue */
1027 struct dvb_frontend_event event;
1028 if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
1029 && errno == EWOULDBLOCK )
1033 /* Now send it all to the frontend device */
1034 if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
1036 msg_Err( p_access, "DVB-C: setting frontend failed (%d): %m", i_ret );
1037 return VLC_EGENERIC;
1043 /*****************************************************************************
1044 * FrontendSetOFDM : controls the FE device
1045 *****************************************************************************/
1046 static fe_bandwidth_t DecodeBandwidth( access_t *p_access )
1049 fe_bandwidth_t fe_bandwidth = 0;
1051 var_Get( p_access, "dvb-bandwidth", &val );
1052 msg_Dbg( p_access, "using bandwidth=%d", val.i_int );
1056 case 0: fe_bandwidth = BANDWIDTH_AUTO; break;
1057 case 6: fe_bandwidth = BANDWIDTH_6_MHZ; break;
1058 case 7: fe_bandwidth = BANDWIDTH_7_MHZ; break;
1059 case 8: fe_bandwidth = BANDWIDTH_8_MHZ; break;
1061 msg_Dbg( p_access, "terrestrial dvb has bandwidth not set, using auto" );
1062 fe_bandwidth = BANDWIDTH_AUTO;
1065 return fe_bandwidth;
1068 static fe_transmit_mode_t DecodeTransmission( access_t *p_access )
1071 fe_transmit_mode_t fe_transmission = 0;
1073 var_Get( p_access, "dvb-transmission", &val );
1074 msg_Dbg( p_access, "using transmission=%d", val.i_int );
1078 case 0: fe_transmission = TRANSMISSION_MODE_AUTO; break;
1079 case 2: fe_transmission = TRANSMISSION_MODE_2K; break;
1080 case 8: fe_transmission = TRANSMISSION_MODE_8K; break;
1082 msg_Dbg( p_access, "terrestrial dvb has transmission mode not set, using auto");
1083 fe_transmission = TRANSMISSION_MODE_AUTO;
1086 return fe_transmission;
1089 static fe_guard_interval_t DecodeGuardInterval( access_t *p_access )
1092 fe_guard_interval_t fe_guard = 0;
1094 var_Get( p_access, "dvb-guard", &val );
1095 msg_Dbg( p_access, "using guard=%d", val.i_int );
1099 case 0: fe_guard = GUARD_INTERVAL_AUTO; break;
1100 case 4: fe_guard = GUARD_INTERVAL_1_4; break;
1101 case 8: fe_guard = GUARD_INTERVAL_1_8; break;
1102 case 16: fe_guard = GUARD_INTERVAL_1_16; break;
1103 case 32: fe_guard = GUARD_INTERVAL_1_32; break;
1105 msg_Dbg( p_access, "terrestrial dvb has guard interval not set, using auto");
1106 fe_guard = GUARD_INTERVAL_AUTO;
1112 static fe_hierarchy_t DecodeHierarchy( access_t *p_access )
1115 fe_hierarchy_t fe_hierarchy = 0;
1117 var_Get( p_access, "dvb-hierarchy", &val );
1118 msg_Dbg( p_access, "using hierarchy=%d", val.i_int );
1122 case -1: fe_hierarchy = HIERARCHY_NONE; break;
1123 case 0: fe_hierarchy = HIERARCHY_AUTO; break;
1124 case 1: fe_hierarchy = HIERARCHY_1; break;
1125 case 2: fe_hierarchy = HIERARCHY_2; break;
1126 case 4: fe_hierarchy = HIERARCHY_4; break;
1128 msg_Dbg( p_access, "terrestrial dvb has hierarchy not set, using auto");
1129 fe_hierarchy = HIERARCHY_AUTO;
1132 return fe_hierarchy;
1135 static int FrontendSetOFDM( access_t * p_access )
1137 access_sys_t *p_sys = p_access->p_sys;
1138 struct dvb_frontend_parameters fep;
1142 /* Prepare the fep structure */
1144 var_Get( p_access, "dvb-frequency", &val );
1145 fep.frequency = val.i_int;
1147 fep.inversion = DecodeInversion( p_access );
1149 fep.u.ofdm.bandwidth = DecodeBandwidth( p_access );
1150 var_Get( p_access, "dvb-code-rate-hp", &val );
1151 fep.u.ofdm.code_rate_HP = DecodeFEC( p_access, val.i_int );
1152 var_Get( p_access, "dvb-code-rate-lp", &val );
1153 fep.u.ofdm.code_rate_LP = DecodeFEC( p_access, val.i_int );
1154 fep.u.ofdm.constellation = DecodeModulationOFDM( p_access );
1155 fep.u.ofdm.transmission_mode = DecodeTransmission( p_access );
1156 fep.u.ofdm.guard_interval = DecodeGuardInterval( p_access );
1157 fep.u.ofdm.hierarchy_information = DecodeHierarchy( p_access );
1159 /* Empty the event queue */
1162 struct dvb_frontend_event event;
1163 if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
1164 && errno == EWOULDBLOCK )
1168 /* Now send it all to the frontend device */
1169 if( (ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
1171 msg_Err( p_access, "DVB-T: setting frontend failed (%d): %s", ret );
1178 /*****************************************************************************
1179 * FrontendSetATSC : controls the FE device
1180 *****************************************************************************/
1181 static int FrontendSetATSC( access_t *p_access )
1183 access_sys_t *p_sys = p_access->p_sys;
1184 struct dvb_frontend_parameters fep;
1188 /* Prepare the fep structure */
1190 var_Get( p_access, "dvb-frequency", &val );
1191 fep.frequency = val.i_int;
1193 fep.u.vsb.modulation = DecodeModulationATSC( p_access );
1195 /* Empty the event queue */
1198 struct dvb_frontend_event event;
1199 if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
1200 && errno == EWOULDBLOCK )
1204 /* Now send it all to the frontend device */
1205 if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
1207 msg_Err( p_access, "ATSC: setting frontend failed (%d): %s", i_ret );
1208 return VLC_EGENERIC;
1219 /*****************************************************************************
1220 * DMXSetFilter : controls the demux to add a filter
1221 *****************************************************************************/
1222 int E_(DMXSetFilter)( access_t * p_access, int i_pid, int * pi_fd, int i_type )
1224 struct dmx_pes_filter_params s_filter_params;
1226 unsigned int i_adapter, i_device;
1230 var_Get( p_access, "dvb-adapter", &val );
1231 i_adapter = val.i_int;
1232 var_Get( p_access, "dvb-device", &val );
1233 i_device = val.i_int;
1235 if( snprintf( dmx, sizeof(dmx), DMX, i_adapter, i_device )
1236 >= (int)sizeof(dmx) )
1238 msg_Err( p_access, "snprintf() truncated string for DMX" );
1239 dmx[sizeof(dmx) - 1] = '\0';
1242 msg_Dbg( p_access, "Opening device %s", dmx );
1243 if( (*pi_fd = open(dmx, O_RDWR)) < 0 )
1245 msg_Err( p_access, "DMXSetFilter: opening device failed (%m)" );
1246 return VLC_EGENERIC;
1249 /* We fill the DEMUX structure : */
1250 s_filter_params.pid = i_pid;
1251 s_filter_params.input = DMX_IN_FRONTEND;
1252 s_filter_params.output = DMX_OUT_TS_TAP;
1253 s_filter_params.flags = DMX_IMMEDIATE_START;
1256 { /* First device */
1258 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO0 for PID %d", i_pid);
1259 s_filter_params.pes_type = DMX_PES_VIDEO0;
1262 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO0 for PID %d", i_pid);
1263 s_filter_params.pes_type = DMX_PES_AUDIO0;
1266 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT0 for PID %d", i_pid);
1267 s_filter_params.pes_type = DMX_PES_TELETEXT0;
1270 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE0 for PID %d", i_pid);
1271 s_filter_params.pes_type = DMX_PES_SUBTITLE0;
1274 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR0 for PID %d", i_pid);
1275 s_filter_params.pes_type = DMX_PES_PCR0;
1279 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO1 for PID %d", i_pid);
1280 s_filter_params.pes_type = DMX_PES_VIDEO1;
1283 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO1 for PID %d", i_pid);
1284 s_filter_params.pes_type = DMX_PES_AUDIO1;
1287 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT1 for PID %d", i_pid);
1288 s_filter_params.pes_type = DMX_PES_TELETEXT1;
1291 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE1 for PID %d", i_pid);
1292 s_filter_params.pes_type = DMX_PES_SUBTITLE1;
1295 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR1 for PID %d", i_pid);
1296 s_filter_params.pes_type = DMX_PES_PCR1;
1300 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO2 for PID %d", i_pid);
1301 s_filter_params.pes_type = DMX_PES_VIDEO2;
1304 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO2 for PID %d", i_pid);
1305 s_filter_params.pes_type = DMX_PES_AUDIO2;
1308 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT2 for PID %d", i_pid);
1309 s_filter_params.pes_type = DMX_PES_TELETEXT2;
1312 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE2 for PID %d", i_pid);
1313 s_filter_params.pes_type = DMX_PES_SUBTITLE2;
1316 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR2 for PID %d", i_pid);
1317 s_filter_params.pes_type = DMX_PES_PCR2;
1321 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO3 for PID %d", i_pid);
1322 s_filter_params.pes_type = DMX_PES_VIDEO3;
1325 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO3 for PID %d", i_pid);
1326 s_filter_params.pes_type = DMX_PES_AUDIO3;
1329 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT3 for PID %d", i_pid);
1330 s_filter_params.pes_type = DMX_PES_TELETEXT3;
1333 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE3 for PID %d", i_pid);
1334 s_filter_params.pes_type = DMX_PES_SUBTITLE3;
1337 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR3 for PID %d", i_pid);
1338 s_filter_params.pes_type = DMX_PES_PCR3;
1340 /* Usually used by Nova cards */
1343 msg_Dbg(p_access, "DMXSetFilter: DMX_PES_OTHER for PID %d", i_pid);
1344 s_filter_params.pes_type = DMX_PES_OTHER;
1348 /* We then give the order to the device : */
1349 if( (i_ret = ioctl( *pi_fd, DMX_SET_PES_FILTER, &s_filter_params )) < 0 )
1351 msg_Err( p_access, "DMXSetFilter: failed with %d (%m)", i_ret );
1352 return VLC_EGENERIC;
1357 /*****************************************************************************
1358 * DMXUnsetFilter : removes a filter
1359 *****************************************************************************/
1360 int E_(DMXUnsetFilter)( access_t * p_access, int i_fd )
1364 if( (i_ret = ioctl( i_fd, DMX_STOP )) < 0 )
1366 msg_Err( p_access, "DMX_STOP failed for demux (%d): %m", i_ret );
1370 msg_Dbg( p_access, "DMXUnsetFilter: closing demux %d", i_fd );
1380 /*****************************************************************************
1382 *****************************************************************************/
1383 int E_(DVROpen)( access_t * p_access )
1385 access_sys_t *p_sys = p_access->p_sys;
1386 unsigned int i_adapter, i_device;
1390 var_Get( p_access, "dvb-adapter", &val );
1391 i_adapter = val.i_int;
1392 var_Get( p_access, "dvb-device", &val );
1393 i_device = val.i_int;
1395 if( snprintf( dvr, sizeof(dvr), DVR, i_adapter, i_device )
1396 >= (int)sizeof(dvr) )
1398 msg_Err( p_access, "snprintf() truncated string for DVR" );
1399 dvr[sizeof(dvr) - 1] = '\0';
1402 msg_Dbg( p_access, "Opening device %s", dvr );
1403 if( (p_sys->i_handle = open(dvr, O_RDONLY)) < 0 )
1405 msg_Err( p_access, "DVROpen: opening device failed (%m)" );
1406 return VLC_EGENERIC;
1409 if( fcntl( p_sys->i_handle, F_SETFL, O_NONBLOCK ) == -1 )
1411 msg_Warn( p_access, "DVROpen: couldn't set non-blocking mode (%m)" );
1417 /*****************************************************************************
1419 *****************************************************************************/
1420 void E_(DVRClose)( access_t * p_access )
1422 access_sys_t *p_sys = p_access->p_sys;
1424 close( p_sys->i_handle );
1432 /*****************************************************************************
1434 *****************************************************************************/
1435 int E_(CAMOpen)( access_t *p_access )
1437 access_sys_t *p_sys = p_access->p_sys;
1439 int i_adapter, i_device;
1442 i_adapter = var_GetInteger( p_access, "dvb-adapter" );
1443 i_device = var_GetInteger( p_access, "dvb-device" );
1445 if( snprintf( ca, sizeof(ca), CA, i_adapter, i_device ) >= (int)sizeof(ca) )
1447 msg_Err( p_access, "snprintf() truncated string for CA" );
1448 ca[sizeof(ca) - 1] = '\0';
1450 memset( &caps, 0, sizeof( ca_caps_t ));
1452 msg_Dbg( p_access, "Opening device %s", ca );
1453 if( (p_sys->i_ca_handle = open(ca, O_RDWR | O_NONBLOCK)) < 0 )
1455 msg_Warn( p_access, "CAMInit: opening CAM device failed (%m)" );
1456 p_sys->i_ca_handle = 0;
1457 return VLC_EGENERIC;
1460 if ( ioctl( p_sys->i_ca_handle, CA_GET_CAP, &caps ) != 0 )
1462 msg_Err( p_access, "CAMInit: ioctl() error getting CAM capabilities" );
1463 close( p_sys->i_ca_handle );
1464 p_sys->i_ca_handle = 0;
1465 return VLC_EGENERIC;
1468 /* Output CA capabilities */
1469 msg_Dbg( p_access, "CAMInit: CA interface with %d %s", caps.slot_num,
1470 caps.slot_num == 1 ? "slot" : "slots" );
1471 if ( caps.slot_type & CA_CI )
1472 msg_Dbg( p_access, "CAMInit: CI high level interface type" );
1473 if ( caps.slot_type & CA_CI_LINK )
1474 msg_Dbg( p_access, "CAMInit: CI link layer level interface type" );
1475 if ( caps.slot_type & CA_CI_PHYS )
1476 msg_Dbg( p_access, "CAMInit: CI physical layer level interface type (not supported) " );
1477 if ( caps.slot_type & CA_DESCR )
1478 msg_Dbg( p_access, "CAMInit: built-in descrambler detected" );
1479 if ( caps.slot_type & CA_SC )
1480 msg_Dbg( p_access, "CAMInit: simple smart card interface" );
1482 msg_Dbg( p_access, "CAMInit: %d available %s", caps.descr_num,
1483 caps.descr_num == 1 ? "descrambler (key)" : "descramblers (keys)" );
1484 if ( caps.descr_type & CA_ECD )
1485 msg_Dbg( p_access, "CAMInit: ECD scrambling system supported" );
1486 if ( caps.descr_type & CA_NDS )
1487 msg_Dbg( p_access, "CAMInit: NDS scrambling system supported" );
1488 if ( caps.descr_type & CA_DSS )
1489 msg_Dbg( p_access, "CAMInit: DSS scrambling system supported" );
1491 if ( caps.slot_num == 0 )
1493 msg_Err( p_access, "CAMInit: CAM module with no slots" );
1494 close( p_sys->i_ca_handle );
1495 p_sys->i_ca_handle = 0;
1496 return VLC_EGENERIC;
1499 if( caps.slot_type & CA_CI_LINK )
1501 p_sys->i_ca_type = CA_CI_LINK;
1503 else if( caps.slot_type & CA_CI )
1505 p_sys->i_ca_type = CA_CI;
1508 p_sys->i_ca_type = -1;
1509 msg_Err( p_access, "CAMInit: incompatible CAM interface" );
1510 close( p_sys->i_ca_handle );
1511 p_sys->i_ca_handle = 0;
1512 return VLC_EGENERIC;
1515 p_sys->i_nb_slots = caps.slot_num;
1516 memset( p_sys->pb_active_slot, 0, sizeof(vlc_bool_t) * MAX_CI_SLOTS );
1517 memset( p_sys->pb_slot_mmi_expected, 0, sizeof(vlc_bool_t) * MAX_CI_SLOTS );
1518 memset( p_sys->pb_slot_mmi_undisplayed, 0,
1519 sizeof(vlc_bool_t) * MAX_CI_SLOTS );
1521 return E_(en50221_Init)( p_access );
1524 /*****************************************************************************
1526 *****************************************************************************/
1527 int E_(CAMPoll)( access_t * p_access )
1529 access_sys_t *p_sys = p_access->p_sys;
1530 int i_ret = VLC_EGENERIC;
1532 if ( p_sys->i_ca_handle == 0 )
1534 return VLC_EGENERIC;
1537 switch( p_sys->i_ca_type )
1540 i_ret = E_(en50221_Poll)( p_access );
1543 i_ret = VLC_SUCCESS;
1546 msg_Err( p_access, "CAMPoll: This should not happen" );
1554 /*****************************************************************************
1556 *****************************************************************************/
1557 void E_(CAMStatus)( access_t * p_access )
1559 access_sys_t *p_sys = p_access->p_sys;
1564 if ( p_sys->psz_request != NULL && *p_sys->psz_request )
1566 /* Check if we have an undisplayed MMI message : in that case we ignore
1567 * the user input to avoid confusing the CAM. */
1568 for ( i_slot = 0; i_slot < p_sys->i_nb_slots; i_slot++ )
1570 if ( p_sys->pb_slot_mmi_undisplayed[i_slot] == VLC_TRUE )
1572 p_sys->psz_request = NULL;
1574 "ignoring user request because of a new MMI object" );
1580 if ( p_sys->psz_request != NULL && *p_sys->psz_request )
1582 /* We have a mission to accomplish. */
1583 en50221_mmi_object_t mmi_object;
1584 char *psz_request = p_sys->psz_request;
1585 char psz_value[255];
1587 vlc_bool_t b_ok = VLC_FALSE;
1589 p_sys->psz_request = NULL;
1591 if ( E_(HTTPExtractValue)( psz_request, "slot", psz_value,
1592 sizeof(psz_value) ) == NULL )
1594 p_sys->psz_mmi_info = strdup( "invalid request parameter\n" );
1597 i_slot = atoi(psz_value);
1599 if ( E_(HTTPExtractValue)( psz_request, "open", psz_value,
1600 sizeof(psz_value) ) != NULL )
1602 E_(en50221_OpenMMI)( p_access, i_slot );
1606 if ( E_(HTTPExtractValue)( psz_request, "close", psz_value,
1607 sizeof(psz_value) ) != NULL )
1609 E_(en50221_CloseMMI)( p_access, i_slot );
1613 if ( E_(HTTPExtractValue)( psz_request, "cancel", psz_value,
1614 sizeof(psz_value) ) == NULL )
1619 if ( E_(HTTPExtractValue)( psz_request, "type", psz_value,
1620 sizeof(psz_value) ) == NULL )
1622 p_sys->psz_mmi_info = strdup( "invalid request parameter\n" );
1626 if ( !strcmp( psz_value, "enq" ) )
1628 mmi_object.i_object_type = EN50221_MMI_ANSW;
1629 mmi_object.u.answ.b_ok = b_ok;
1630 if ( b_ok == VLC_FALSE )
1632 mmi_object.u.answ.psz_answ = strdup("");
1636 if ( E_(HTTPExtractValue)( psz_request, "answ", psz_value,
1637 sizeof(psz_value) ) == NULL )
1639 p_sys->psz_mmi_info = strdup( "invalid request parameter\n" );
1643 mmi_object.u.answ.psz_answ = strdup(psz_value);
1648 mmi_object.i_object_type = EN50221_MMI_MENU_ANSW;
1649 if ( b_ok == VLC_FALSE )
1651 mmi_object.u.menu_answ.i_choice = 0;
1655 if ( E_(HTTPExtractValue)( psz_request, "choice", psz_value,
1656 sizeof(psz_value) ) == NULL )
1657 mmi_object.u.menu_answ.i_choice = 0;
1659 mmi_object.u.menu_answ.i_choice = atoi(psz_value);
1663 E_(en50221_SendMMIObject)( p_access, i_slot, &mmi_object );
1667 /* Check that we have all necessary MMI information. */
1668 for ( i_slot = 0; i_slot < p_sys->i_nb_slots; i_slot++ )
1670 if ( p_sys->pb_slot_mmi_expected[i_slot] == VLC_TRUE )
1674 p = p_sys->psz_mmi_info = malloc( 10000 );
1676 if ( ioctl( p_sys->i_ca_handle, CA_GET_CAP, &caps ) != 0 )
1679 strerror_r( errno, buf, sizeof( buf ) );
1680 p += sprintf( p, "ioctl CA_GET_CAP failed (%s)\n", buf );
1684 /* Output CA capabilities */
1685 p += sprintf( p, "CA interface with %d %s, type:\n<table>", caps.slot_num,
1686 caps.slot_num == 1 ? "slot" : "slots" );
1687 #define CHECK_CAPS( x, s ) \
1688 if ( caps.slot_type & (CA_##x) ) \
1689 p += sprintf( p, "<tr><td>" s "</td></tr>\n" );
1691 CHECK_CAPS( CI, "CI high level interface" );
1692 CHECK_CAPS( CI_LINK, "CI link layer level interface" );
1693 CHECK_CAPS( CI_PHYS, "CI physical layer level interface (not supported)" );
1694 CHECK_CAPS( DESCR, "built-in descrambler" );
1695 CHECK_CAPS( SC, "simple smartcard interface" );
1698 p += sprintf( p, "</table>%d available %s\n<table>", caps.descr_num,
1699 caps.descr_num == 1 ? "descrambler (key)" : "descramblers (keys)" );
1700 #define CHECK_DESC( x ) \
1701 if ( caps.descr_type & (CA_##x) ) \
1702 p += sprintf( p, "<tr><td>" STRINGIFY(x) "</td></tr>\n" );
1709 p += sprintf( p, "</table>" );
1711 for ( i_slot = 0; i_slot < p_sys->i_nb_slots; i_slot++ )
1713 ca_slot_info_t sinfo;
1715 p_sys->pb_slot_mmi_undisplayed[i_slot] = VLC_FALSE;
1716 p += sprintf( p, "<p>CA slot #%d: ", i_slot );
1719 if ( ioctl( p_sys->i_ca_handle, CA_GET_SLOT_INFO, &sinfo ) != 0 )
1722 strerror_r( errno, buf, sizeof( buf ) );
1723 p += sprintf( p, "ioctl CA_GET_SLOT_INFO failed (%s)<br>\n", buf );
1727 #define CHECK_TYPE( x, s ) \
1728 if ( sinfo.type & (CA_##x) ) \
1729 p += sprintf( p, "%s", s );
1731 CHECK_TYPE( CI, "high level, " );
1732 CHECK_TYPE( CI_LINK, "link layer level, " );
1733 CHECK_TYPE( CI_PHYS, "physical layer level, " );
1736 if ( sinfo.flags & CA_CI_MODULE_READY )
1738 en50221_mmi_object_t *p_object = E_(en50221_GetMMIObject)( p_access,
1741 p += sprintf( p, "module present and ready<p>\n" );
1742 p += sprintf( p, "<form action=index.html method=get>\n" );
1743 p += sprintf( p, "<input type=hidden name=slot value=\"%d\">\n",
1746 if ( p_object == NULL )
1748 p += sprintf( p, "<input type=submit name=open value=\"Open session\">\n" );
1752 switch ( p_object->i_object_type )
1754 case EN50221_MMI_ENQ:
1755 p += sprintf( p, "<input type=hidden name=type value=enq>\n" );
1756 p += sprintf( p, "<table border=1><tr><th>%s</th></tr>\n",
1757 p_object->u.enq.psz_text );
1758 if ( p_object->u.enq.b_blind == VLC_FALSE )
1759 p += sprintf( p, "<tr><td><input type=text name=answ></td></tr>\n" );
1761 p += sprintf( p, "<tr><td><input type=password name=answ></td></tr>\n" );
1764 case EN50221_MMI_MENU:
1765 p += sprintf( p, "<input type=hidden name=type value=menu>\n" );
1766 p += sprintf( p, "<table border=1><tr><th>%s</th></tr>\n",
1767 p_object->u.menu.psz_title );
1768 p += sprintf( p, "<tr><td>%s</td></tr><tr><td>\n",
1769 p_object->u.menu.psz_subtitle );
1770 for ( i = 0; i < p_object->u.menu.i_choices; i++ )
1771 p += sprintf( p, "<input type=radio name=choice value=\"%d\">%s<br>\n", i + 1, p_object->u.menu.ppsz_choices[i] );
1772 p += sprintf( p, "</td></tr><tr><td>%s</td></tr>\n",
1773 p_object->u.menu.psz_bottom );
1776 case EN50221_MMI_LIST:
1777 p += sprintf( p, "<input type=hidden name=type value=menu>\n" );
1778 p += sprintf( p, "<input type=hidden name=choice value=0>\n" );
1779 p += sprintf( p, "<table border=1><tr><th>%s</th></tr>\n",
1780 p_object->u.menu.psz_title );
1781 p += sprintf( p, "<tr><td>%s</td></tr><tr><td>\n",
1782 p_object->u.menu.psz_subtitle );
1783 for ( i = 0; i < p_object->u.menu.i_choices; i++ )
1784 p += sprintf( p, "%s<br>\n",
1785 p_object->u.menu.ppsz_choices[i] );
1786 p += sprintf( p, "</td></tr><tr><td>%s</td></tr>\n",
1787 p_object->u.menu.psz_bottom );
1791 p += sprintf( p, "<table><tr><th>Unknown MMI object type</th></tr>\n" );
1794 p += sprintf( p, "</table><p><input type=submit name=ok value=\"OK\">\n" );
1795 p += sprintf( p, "<input type=submit name=cancel value=\"Cancel\">\n" );
1796 p += sprintf( p, "<input type=submit name=close value=\"Close Session\">\n" );
1798 p += sprintf( p, "</form>\n" );
1800 else if ( sinfo.flags & CA_CI_MODULE_PRESENT )
1801 p += sprintf( p, "module present, not ready<br>\n" );
1803 p += sprintf( p, "module not present<br>\n" );
1807 vlc_mutex_lock( &p_sys->httpd_mutex );
1808 p_sys->b_request_mmi_info = VLC_FALSE;
1809 vlc_cond_signal( &p_sys->httpd_cond );
1810 vlc_mutex_unlock( &p_sys->httpd_mutex );
1814 /*****************************************************************************
1816 *****************************************************************************/
1817 int E_(CAMSet)( access_t * p_access, dvbpsi_pmt_t *p_pmt )
1819 access_sys_t *p_sys = p_access->p_sys;
1821 if( p_sys->i_ca_handle == 0 )
1823 dvbpsi_DeletePMT( p_pmt );
1824 return VLC_EGENERIC;
1827 E_(en50221_SetCAPMT)( p_access, p_pmt );
1832 /*****************************************************************************
1834 *****************************************************************************/
1835 void E_(CAMClose)( access_t * p_access )
1837 access_sys_t *p_sys = p_access->p_sys;
1839 E_(en50221_End)( p_access );
1841 if ( p_sys->i_ca_handle )
1843 close( p_sys->i_ca_handle );