]> git.sesse.net Git - vlc/blob - modules/access/dvb/linux_dvb.c
h264 packetizer : do not trust the input data in p_extra
[vlc] / modules / access / dvb / linux_dvb.c
1 /*****************************************************************************
2  * linux_dvb.c : functions to control a DVB card under Linux with v4l2
3  *****************************************************************************
4  * Copyright (C) 1998-2005 the VideoLAN team
5  *
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>
11  *
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.
16  *
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.
21  *
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  *****************************************************************************/
26
27 #ifdef HAVE_CONFIG_H
28 # include "config.h"
29 #endif
30
31 #include <vlc/vlc.h>
32 #include <vlc_access.h>
33 #include <sys/ioctl.h>
34 #include <errno.h>
35
36 #include <sys/types.h>
37 #include <sys/stat.h>
38 #include <fcntl.h>
39 #include <time.h>
40 #include <unistd.h>
41 #include <sys/stat.h>
42 #include <sys/poll.h>
43
44 /* DVB Card Drivers */
45 #include <linux/dvb/version.h>
46 #include <linux/dvb/dmx.h>
47 #include <linux/dvb/frontend.h>
48 #include <linux/dvb/ca.h>
49
50 /* Include dvbpsi headers */
51 #ifdef HAVE_DVBPSI_DR_H
52 #   include <dvbpsi/dvbpsi.h>
53 #   include <dvbpsi/descriptor.h>
54 #   include <dvbpsi/pat.h>
55 #   include <dvbpsi/pmt.h>
56 #   include <dvbpsi/dr.h>
57 #   include <dvbpsi/psi.h>
58 #else
59 #   include "dvbpsi.h"
60 #   include "descriptor.h"
61 #   include "tables/pat.h"
62 #   include "tables/pmt.h"
63 #   include "descriptors/dr.h"
64 #   include "psi.h"
65 #endif
66
67 #ifdef ENABLE_HTTPD
68 #   include "vlc_httpd.h"
69 #endif
70
71 #include "dvb.h"
72
73 /*
74  * Frontends
75  */
76 struct frontend_t
77 {
78     fe_status_t i_last_status;
79     struct dvb_frontend_info info;
80 };
81
82 #define FRONTEND_LOCK_TIMEOUT 10000000 /* 10 s */
83
84 /* Local prototypes */
85 static int FrontendInfo( access_t * );
86 static int FrontendSetQPSK( access_t * );
87 static int FrontendSetQAM( access_t * );
88 static int FrontendSetOFDM( access_t * );
89 static int FrontendSetATSC( access_t * );
90
91 /*****************************************************************************
92  * FrontendOpen : Determine frontend device information and capabilities
93  *****************************************************************************/
94 int E_(FrontendOpen)( access_t *p_access )
95 {
96     access_sys_t *p_sys = p_access->p_sys;
97     frontend_t * p_frontend;
98     unsigned int i_adapter, i_device;
99     vlc_bool_t b_probe;
100     char frontend[128];
101
102     i_adapter = var_GetInteger( p_access, "dvb-adapter" );
103     i_device = var_GetInteger( p_access, "dvb-device" );
104     b_probe = var_GetBool( p_access, "dvb-probe" );
105
106     if( snprintf( frontend, sizeof(frontend), FRONTEND, i_adapter, i_device ) >= (int)sizeof(frontend) )
107     {
108         msg_Err( p_access, "snprintf() truncated string for FRONTEND" );
109         frontend[sizeof(frontend) - 1] = '\0';
110     }
111
112     p_sys->p_frontend = p_frontend = malloc( sizeof(frontend_t) );
113
114     msg_Dbg( p_access, "Opening device %s", frontend );
115     if( (p_sys->i_frontend_handle = open(frontend, O_RDWR | O_NONBLOCK)) < 0 )
116     {
117         msg_Err( p_access, "FrontEndOpen: opening device failed (%m)" );
118         free( p_frontend );
119         return VLC_EGENERIC;
120     }
121
122     if( b_probe )
123     {
124         const char * psz_expected = NULL;
125         const char * psz_real;
126
127         if( FrontendInfo( p_access ) < 0 )
128         {
129             close( p_sys->i_frontend_handle );
130             free( p_frontend );
131             return VLC_EGENERIC;
132         }
133
134         switch( p_frontend->info.type )
135         {
136         case FE_OFDM:
137             psz_real = "DVB-T";
138             break;
139         case FE_QAM:
140             psz_real = "DVB-C";
141             break;
142         case FE_QPSK:
143             psz_real = "DVB-S";
144             break;
145         case FE_ATSC:
146             psz_real = "ATSC";
147             break;
148         default:
149             psz_real = "unknown";
150         }
151
152         /* Sanity checks */
153         if( (!strncmp( p_access->psz_access, "qpsk", 4 ) ||
154              !strncmp( p_access->psz_access, "dvb-s", 5 ) ||
155              !strncmp( p_access->psz_access, "satellite", 9 ) ) &&
156              (p_frontend->info.type != FE_QPSK) )
157         {
158             psz_expected = "DVB-S";
159         }
160         if( (!strncmp( p_access->psz_access, "cable", 5 ) ||
161              !strncmp( p_access->psz_access, "dvb-c", 5 ) ) &&
162              (p_frontend->info.type != FE_QAM) )
163         {
164             psz_expected = "DVB-C";
165         }
166         if( (!strncmp( p_access->psz_access, "terrestrial", 11 ) ||
167              !strncmp( p_access->psz_access, "dvb-t", 5 ) ) &&
168              (p_frontend->info.type != FE_OFDM) )
169         {
170             psz_expected = "DVB-T";
171         }
172
173         if( (!strncmp( p_access->psz_access, "usdigital", 9 ) ||
174              !strncmp( p_access->psz_access, "atsc", 4 ) ) &&
175              (p_frontend->info.type != FE_ATSC) )
176         {
177             psz_expected = "ATSC";
178         }
179
180         if( psz_expected != NULL )
181         {
182             msg_Err( p_access, "the user asked for %s, and the tuner is %s",
183                      psz_expected, psz_real );
184             close( p_sys->i_frontend_handle );
185             free( p_frontend );
186             return VLC_EGENERIC;
187         }
188     }
189     else /* no frontend probing is done so use default border values. */
190     {
191         msg_Dbg( p_access, "using default values for frontend info" );
192
193         msg_Dbg( p_access, "method of access is %s", p_access->psz_access );
194         p_frontend->info.type = FE_QPSK;
195         if( !strncmp( p_access->psz_access, "qpsk", 4 ) ||
196             !strncmp( p_access->psz_access, "dvb-s", 5 ) )
197             p_frontend->info.type = FE_QPSK;
198         else if( !strncmp( p_access->psz_access, "cable", 5 ) ||
199                  !strncmp( p_access->psz_access, "dvb-c", 5 ) )
200             p_frontend->info.type = FE_QAM;
201         else if( !strncmp( p_access->psz_access, "terrestrial", 11 ) ||
202                  !strncmp( p_access->psz_access, "dvb-t", 5 ) )
203             p_frontend->info.type = FE_OFDM;
204         else if( !strncmp( p_access->psz_access, "usdigital", 9 ) ||
205                  !strncmp( p_access->psz_access, "atsc", 4 ) )
206             p_frontend->info.type = FE_ATSC;
207     }
208
209     return VLC_SUCCESS;
210 }
211
212 /*****************************************************************************
213  * FrontendClose : Close the frontend
214  *****************************************************************************/
215 void E_(FrontendClose)( access_t *p_access )
216 {
217     access_sys_t *p_sys = p_access->p_sys;
218
219     if( p_sys->p_frontend )
220     {
221         close( p_sys->i_frontend_handle );
222         free( p_sys->p_frontend );
223
224         p_sys->p_frontend = NULL;
225     }
226 }
227
228 /*****************************************************************************
229  * FrontendSet : Tune !
230  *****************************************************************************/
231 int E_(FrontendSet)( access_t *p_access )
232 {
233     access_sys_t *p_sys = p_access->p_sys;
234
235     switch( p_sys->p_frontend->info.type )
236     {
237     /* DVB-S */
238     case FE_QPSK:
239         if( FrontendSetQPSK( p_access ) < 0 )
240         {
241             msg_Err( p_access, "DVB-S: tuning failed" );
242             return VLC_EGENERIC;
243         }
244         break;
245
246     /* DVB-C */
247     case FE_QAM:
248         if( FrontendSetQAM( p_access ) < 0 )
249         {
250             msg_Err( p_access, "DVB-C: tuning failed" );
251             return VLC_EGENERIC;
252         }
253         break;
254
255     /* DVB-T */
256     case FE_OFDM:
257         if( FrontendSetOFDM( p_access ) < 0 )
258         {
259             msg_Err( p_access, "DVB-T: tuning failed" );
260             return VLC_EGENERIC;
261         }
262         break;
263
264     /* ATSC */
265     case FE_ATSC:
266         if( FrontendSetATSC( p_access ) < 0 )
267         {
268             msg_Err( p_access, "ATSC: tuning failed" );
269             return VLC_EGENERIC;
270         }
271         break;
272
273     default:
274         msg_Err( p_access, "Could not determine frontend type on %s",
275                  p_sys->p_frontend->info.name );
276         return VLC_EGENERIC;
277     }
278     p_sys->p_frontend->i_last_status = 0;
279     p_sys->i_frontend_timeout = mdate() + FRONTEND_LOCK_TIMEOUT;
280     return VLC_SUCCESS;
281 }
282
283 /*****************************************************************************
284  * FrontendPoll : Poll for frontend events
285  *****************************************************************************/
286 void E_(FrontendPoll)( access_t *p_access )
287 {
288     access_sys_t *p_sys = p_access->p_sys;
289     frontend_t * p_frontend = p_sys->p_frontend;
290     struct dvb_frontend_event event;
291     fe_status_t i_status, i_diff;
292
293     for( ;; )
294     {
295         int i_ret = ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event );
296
297         if( i_ret < 0 )
298         {
299             if( errno == EWOULDBLOCK )
300                 return; /* no more events */
301
302             msg_Err( p_access, "reading frontend event failed (%d): %m",
303                      i_ret );
304             return;
305         }
306
307         i_status = event.status;
308         i_diff = i_status ^ p_frontend->i_last_status;
309         p_frontend->i_last_status = i_status;
310
311         {
312 #define IF_UP( x )                                                          \
313         }                                                                   \
314         if ( i_diff & (x) )                                                 \
315         {                                                                   \
316             if ( i_status & (x) )
317
318             IF_UP( FE_HAS_SIGNAL )
319                 msg_Dbg( p_access, "frontend has acquired signal" );
320             else
321                 msg_Dbg( p_access, "frontend has lost signal" );
322
323             IF_UP( FE_HAS_CARRIER )
324                 msg_Dbg( p_access, "frontend has acquired carrier" );
325             else
326                 msg_Dbg( p_access, "frontend has lost carrier" );
327
328             IF_UP( FE_HAS_VITERBI )
329                 msg_Dbg( p_access, "frontend has acquired stable FEC" );
330             else
331                 msg_Dbg( p_access, "frontend has lost FEC" );
332
333             IF_UP( FE_HAS_SYNC )
334                 msg_Dbg( p_access, "frontend has acquired sync" );
335             else
336                 msg_Dbg( p_access, "frontend has lost sync" );
337
338             IF_UP( FE_HAS_LOCK )
339             {
340                 int32_t i_value = 0;
341                 msg_Dbg( p_access, "frontend has acquired lock" );
342                 p_sys->i_frontend_timeout = 0;
343
344                 /* Read some statistics */
345                 if( ioctl( p_sys->i_frontend_handle, FE_READ_BER, &i_value ) >= 0 )
346                     msg_Dbg( p_access, "- Bit error rate: %d", i_value );
347                 if( ioctl( p_sys->i_frontend_handle, FE_READ_SIGNAL_STRENGTH, &i_value ) >= 0 )
348                     msg_Dbg( p_access, "- Signal strength: %d", i_value );
349                 if( ioctl( p_sys->i_frontend_handle, FE_READ_SNR, &i_value ) >= 0 )
350                     msg_Dbg( p_access, "- SNR: %d", i_value );
351             }
352             else
353             {
354                 msg_Dbg( p_access, "frontend has lost lock" );
355                 p_sys->i_frontend_timeout = mdate() + FRONTEND_LOCK_TIMEOUT;
356             }
357
358             IF_UP( FE_REINIT )
359             {
360                 /* The frontend was reinited. */
361                 msg_Warn( p_access, "reiniting frontend");
362                 E_(FrontendSet)( p_access );
363             }
364         }
365 #undef IF_UP
366     }
367 }
368
369 #ifdef ENABLE_HTTPD
370 /*****************************************************************************
371  * FrontendStatus : Read frontend status
372  *****************************************************************************/
373 void E_(FrontendStatus)( access_t *p_access )
374 {
375     access_sys_t *p_sys = p_access->p_sys;
376     frontend_t *p_frontend = p_sys->p_frontend;
377     char *p = p_sys->psz_frontend_info = malloc( 10000 );
378     fe_status_t i_status;
379     int i_ret;
380
381     /* Determine type of frontend */
382     if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_GET_INFO,
383                         &p_frontend->info )) < 0 )
384     {
385         char buf[1000];
386         strerror_r( errno, buf, sizeof( buf ) );
387         p += sprintf( p, "ioctl FE_GET_INFO failed (%d) %s\n", i_ret, buf );
388         goto out;
389     }
390
391     /* Print out frontend capabilities. */
392     p += sprintf( p, "<table border=1><tr><th>name</th><td>%s</td></tr>\n",
393                   p_frontend->info.name );
394     switch( p_frontend->info.type )
395     {
396         case FE_QPSK:
397             p += sprintf( p, "<tr><th>type</th><td>QPSK (DVB-S)</td></tr>\n" );
398             break;
399         case FE_QAM:
400             p += sprintf( p, "<tr><th>type</th><td>QAM (DVB-C)</td></tr>\n" );
401             break;
402         case FE_OFDM:
403             p += sprintf( p, "<tr><th>type</th><td>OFDM (DVB-T)</td></tr>\n" );
404             break;
405 #if 0 /* DVB_API_VERSION == 3 */
406         case FE_MEMORY:
407             p += sprintf( p, "<tr><th>type</th><td>MEMORY</td></tr>\n" );
408             break;
409         case FE_NET:
410             p += sprintf( p, "<tr><th>type</th><td>NETWORK</td></tr>\n" );
411             break;
412 #endif
413         default:
414             p += sprintf( p, "<tr><th>type</th><td>UNKNOWN (%d)</td></tr>\n",
415                           p_frontend->info.type );
416             goto out;
417     }
418 #define CHECK_INFO( x )                                                     \
419     p += sprintf( p,                                                        \
420                   "<tr><th>" STRINGIFY(x) "</th><td>%u</td></tr>\n",        \
421                   p_frontend->info.x );
422
423     CHECK_INFO( frequency_min );
424     CHECK_INFO( frequency_max );
425     CHECK_INFO( frequency_stepsize );
426     CHECK_INFO( frequency_tolerance );
427     CHECK_INFO( symbol_rate_min );
428     CHECK_INFO( symbol_rate_max );
429     CHECK_INFO( symbol_rate_tolerance );
430     CHECK_INFO( notifier_delay );
431 #undef CHECK_INFO
432
433     p += sprintf( p, "</table><p>Frontend capability list:\n<table border=1>" );
434
435 #define CHECK_CAPS( x )                                                     \
436     if ( p_frontend->info.caps & (FE_##x) )                                 \
437         p += sprintf( p, "<tr><td>" STRINGIFY(x) "</td></tr>\n" );
438
439     CHECK_CAPS( IS_STUPID );
440     CHECK_CAPS( CAN_INVERSION_AUTO );
441     CHECK_CAPS( CAN_FEC_1_2 );
442     CHECK_CAPS( CAN_FEC_2_3 );
443     CHECK_CAPS( CAN_FEC_3_4 );
444     CHECK_CAPS( CAN_FEC_4_5 );
445     CHECK_CAPS( CAN_FEC_5_6 );
446     CHECK_CAPS( CAN_FEC_6_7 );
447     CHECK_CAPS( CAN_FEC_7_8 );
448     CHECK_CAPS( CAN_FEC_8_9 );
449     CHECK_CAPS( CAN_FEC_AUTO );
450     CHECK_CAPS( CAN_QPSK );
451     CHECK_CAPS( CAN_QAM_16 );
452     CHECK_CAPS( CAN_QAM_32 );
453     CHECK_CAPS( CAN_QAM_64 );
454     CHECK_CAPS( CAN_QAM_128 );
455     CHECK_CAPS( CAN_QAM_256 );
456     CHECK_CAPS( CAN_QAM_AUTO );
457     CHECK_CAPS( CAN_TRANSMISSION_MODE_AUTO );
458     CHECK_CAPS( CAN_BANDWIDTH_AUTO );
459     CHECK_CAPS( CAN_GUARD_INTERVAL_AUTO );
460     CHECK_CAPS( CAN_HIERARCHY_AUTO );
461     CHECK_CAPS( CAN_MUTE_TS );
462     CHECK_CAPS( CAN_RECOVER );
463 #if 0 /* Disabled because of older distributions */
464     CHECK_CAPS( CAN_CLEAN_SETUP );
465 #endif
466 #undef CHECK_CAPS
467
468     p += sprintf( p, "</table><p>Current frontend status:\n<table border=1>" );
469
470     if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_READ_STATUS, &i_status ))
471            < 0 )
472     {
473         char buf[1000];
474         strerror_r( errno, buf, sizeof( buf ) );
475         p += sprintf( p, "</table>ioctl FE_READ_STATUS failed (%d) %s\n",
476                       i_ret, buf );
477         goto out;
478     }
479
480 #define CHECK_STATUS( x )                                                   \
481     if ( i_status & (FE_##x) )                                              \
482         p += sprintf( p, "<tr><td>" STRINGIFY(x) "</td></tr>\n" );
483
484     CHECK_STATUS( HAS_SIGNAL );
485     CHECK_STATUS( HAS_CARRIER );
486     CHECK_STATUS( HAS_VITERBI );
487     CHECK_STATUS( HAS_SYNC );
488     CHECK_STATUS( HAS_LOCK );
489     CHECK_STATUS( REINIT );
490     if( i_status == 0 )
491         p += sprintf( p, "<tr><td>Tuning failed</td></tr>\n" );
492 #undef CHECK_STATUS
493
494     if ( i_status & FE_HAS_LOCK )
495     {
496         int32_t i_value;
497         p += sprintf( p, "</table><p>Signal status:\n<table border=1>" );
498         if( ioctl( p_sys->i_frontend_handle, FE_READ_BER, &i_value ) >= 0 )
499             p += sprintf( p, "<tr><th>Bit error rate</th><td>%d</td></tr>\n",
500                           i_value );
501         if( ioctl( p_sys->i_frontend_handle, FE_READ_SIGNAL_STRENGTH,
502                    &i_value ) >= 0 )
503             p += sprintf( p, "<tr><th>Signal strength</th><td>%d</td></tr>\n",
504                           i_value );
505         if( ioctl( p_sys->i_frontend_handle, FE_READ_SNR, &i_value ) >= 0 )
506             p += sprintf( p, "<tr><th>SNR</th><td>%d</td></tr>\n",
507                           i_value );
508     }
509     p += sprintf( p, "</table>" );
510
511 out:
512     vlc_mutex_lock( &p_sys->httpd_mutex );
513     p_sys->b_request_frontend_info = VLC_FALSE;
514     vlc_cond_signal( &p_sys->httpd_cond );
515     vlc_mutex_unlock( &p_sys->httpd_mutex );
516 }
517 #endif
518
519 /*****************************************************************************
520  * FrontendInfo : Return information about given frontend
521  *****************************************************************************/
522 static int FrontendInfo( access_t *p_access )
523 {
524     access_sys_t *p_sys = p_access->p_sys;
525     frontend_t *p_frontend = p_sys->p_frontend;
526     int i_ret;
527
528     /* Determine type of frontend */
529     if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_GET_INFO,
530                         &p_frontend->info )) < 0 )
531     {
532         msg_Err( p_access, "ioctl FE_GET_INFO failed (%d): %m", i_ret );
533         return VLC_EGENERIC;
534     }
535
536     /* Print out frontend capabilities. */
537     msg_Dbg(p_access, "Frontend Info:" );
538     msg_Dbg(p_access, "  name = %s", p_frontend->info.name );
539     switch( p_frontend->info.type )
540     {
541         case FE_QPSK:
542             msg_Dbg( p_access, "  type = QPSK (DVB-S)" );
543             break;
544         case FE_QAM:
545             msg_Dbg( p_access, "  type = QAM (DVB-C)" );
546             break;
547         case FE_OFDM:
548             msg_Dbg( p_access, "  type = OFDM (DVB-T)" );
549             break;
550         case FE_ATSC:
551             msg_Dbg( p_access, "  type = ATSC (USA)" );
552             break;
553 #if 0 /* DVB_API_VERSION == 3 */
554         case FE_MEMORY:
555             msg_Dbg(p_access, "  type = MEMORY" );
556             break;
557         case FE_NET:
558             msg_Dbg(p_access, "  type = NETWORK" );
559             break;
560 #endif
561         default:
562             msg_Err( p_access, "  unknown frontend type (%d)",
563                      p_frontend->info.type );
564             return VLC_EGENERIC;
565     }
566     msg_Dbg(p_access, "  frequency_min = %u (kHz)",
567             p_frontend->info.frequency_min);
568     msg_Dbg(p_access, "  frequency_max = %u (kHz)",
569             p_frontend->info.frequency_max);
570     msg_Dbg(p_access, "  frequency_stepsize = %u",
571             p_frontend->info.frequency_stepsize);
572     msg_Dbg(p_access, "  frequency_tolerance = %u",
573             p_frontend->info.frequency_tolerance);
574     msg_Dbg(p_access, "  symbol_rate_min = %u (kHz)",
575             p_frontend->info.symbol_rate_min);
576     msg_Dbg(p_access, "  symbol_rate_max = %u (kHz)",
577             p_frontend->info.symbol_rate_max);
578     msg_Dbg(p_access, "  symbol_rate_tolerance (ppm) = %u",
579             p_frontend->info.symbol_rate_tolerance);
580     msg_Dbg(p_access, "  notifier_delay (ms) = %u",
581             p_frontend->info.notifier_delay );
582
583     msg_Dbg(p_access, "Frontend Info capability list:");
584     if( p_frontend->info.caps & FE_IS_STUPID)
585         msg_Dbg(p_access, "  no capabilities - frontend is stupid!");
586     if( p_frontend->info.caps & FE_CAN_INVERSION_AUTO)
587         msg_Dbg(p_access, "  inversion auto");
588     if( p_frontend->info.caps & FE_CAN_FEC_1_2)
589         msg_Dbg(p_access, "  forward error correction 1/2");
590     if( p_frontend->info.caps & FE_CAN_FEC_2_3)
591         msg_Dbg(p_access, "  forward error correction 2/3");
592     if( p_frontend->info.caps & FE_CAN_FEC_3_4)
593         msg_Dbg(p_access, "  forward error correction 3/4");
594     if( p_frontend->info.caps & FE_CAN_FEC_4_5)
595         msg_Dbg(p_access, "  forward error correction 4/5");
596     if( p_frontend->info.caps & FE_CAN_FEC_5_6)
597         msg_Dbg(p_access, "  forward error correction 5/6");
598     if( p_frontend->info.caps & FE_CAN_FEC_6_7)
599         msg_Dbg(p_access, "  forward error correction 6/7");
600     if( p_frontend->info.caps & FE_CAN_FEC_7_8)
601         msg_Dbg(p_access, "  forward error correction 7/8");
602     if( p_frontend->info.caps & FE_CAN_FEC_8_9)
603         msg_Dbg(p_access, "  forward error correction 8/9");
604     if( p_frontend->info.caps & FE_CAN_FEC_AUTO)
605         msg_Dbg(p_access, "  forward error correction auto");
606     if( p_frontend->info.caps & FE_CAN_QPSK)
607         msg_Dbg(p_access, "  card can do QPSK");
608     if( p_frontend->info.caps & FE_CAN_QAM_16)
609         msg_Dbg(p_access, "  card can do QAM 16");
610     if( p_frontend->info.caps & FE_CAN_QAM_32)
611         msg_Dbg(p_access, "  card can do QAM 32");
612     if( p_frontend->info.caps & FE_CAN_QAM_64)
613         msg_Dbg(p_access, "  card can do QAM 64");
614     if( p_frontend->info.caps & FE_CAN_QAM_128)
615         msg_Dbg(p_access, "  card can do QAM 128");
616     if( p_frontend->info.caps & FE_CAN_QAM_256)
617         msg_Dbg(p_access, "  card can do QAM 256");
618     if( p_frontend->info.caps & FE_CAN_QAM_AUTO)
619         msg_Dbg(p_access, "  card can do QAM auto");
620     if( p_frontend->info.caps & FE_CAN_TRANSMISSION_MODE_AUTO)
621         msg_Dbg(p_access, "  transmission mode auto");
622     if( p_frontend->info.caps & FE_CAN_BANDWIDTH_AUTO)
623         msg_Dbg(p_access, "  bandwidth mode auto");
624     if( p_frontend->info.caps & FE_CAN_GUARD_INTERVAL_AUTO)
625         msg_Dbg(p_access, "  guard interval mode auto");
626     if( p_frontend->info.caps & FE_CAN_HIERARCHY_AUTO)
627         msg_Dbg(p_access, "  hierarchy mode auto");
628     if( p_frontend->info.caps & FE_CAN_MUTE_TS)
629         msg_Dbg(p_access, "  card can mute TS");
630     if( p_frontend->info.caps & FE_CAN_RECOVER)
631         msg_Dbg(p_access, "  card can recover from a cable unplug");
632     if( p_frontend->info.caps & FE_CAN_8VSB)
633         msg_Dbg(p_access, "  card can do 8vsb");
634     if( p_frontend->info.caps & FE_CAN_16VSB)
635         msg_Dbg(p_access, "  card can do 16vsb");
636     msg_Dbg(p_access, "End of capability list");
637
638     return VLC_SUCCESS;
639 }
640
641 /*****************************************************************************
642  * Decoding the DVB parameters (common)
643  *****************************************************************************/
644 static fe_spectral_inversion_t DecodeInversion( access_t *p_access )
645 {
646     vlc_value_t         val;
647     fe_spectral_inversion_t fe_inversion = 0;
648
649     var_Get( p_access, "dvb-inversion", &val );
650     msg_Dbg( p_access, "using inversion=%d", val.i_int );
651
652     switch( val.i_int )
653     {
654         case 0: fe_inversion = INVERSION_OFF; break;
655         case 1: fe_inversion = INVERSION_ON; break;
656         case 2: fe_inversion = INVERSION_AUTO; break;
657         default:
658             msg_Dbg( p_access, "dvb has inversion not set, using auto");
659             fe_inversion = INVERSION_AUTO;
660             break;
661     }
662     return fe_inversion;
663 }
664
665 static fe_code_rate_t DecodeFEC( access_t *p_access, int i_val )
666 {
667     fe_code_rate_t      fe_fec = FEC_NONE;
668
669     msg_Dbg( p_access, "using fec=%d", i_val );
670
671     switch( i_val )
672     {
673         case 0: fe_fec = FEC_NONE; break;
674         case 1: fe_fec = FEC_1_2; break;
675         case 2: fe_fec = FEC_2_3; break;
676         case 3: fe_fec = FEC_3_4; break;
677         case 4: fe_fec = FEC_4_5; break;
678         case 5: fe_fec = FEC_5_6; break;
679         case 6: fe_fec = FEC_6_7; break;
680         case 7: fe_fec = FEC_7_8; break;
681         case 8: fe_fec = FEC_8_9; break;
682         case 9: fe_fec = FEC_AUTO; break;
683         default:
684             /* cannot happen */
685             fe_fec = FEC_NONE;
686             msg_Err( p_access, "argument has invalid FEC (%d)", i_val);
687             break;
688     }
689     return fe_fec;
690 }
691
692 static fe_modulation_t DecodeModulationQAM( access_t *p_access )
693 {
694     switch( var_GetInteger( p_access, "dvb-modulation" ) )
695     {
696         case 0:     return QAM_AUTO;
697         case 16:    return QAM_16;
698         case 32:    return QAM_32;
699         case 64:    return QAM_64;
700         case 128:   return QAM_128;
701         case 256:   return QAM_256;
702         default:
703             msg_Dbg( p_access, "QAM modulation not set, using auto");
704             return QAM_AUTO;
705     }
706 }
707 static fe_modulation_t DecodeModulationOFDM( access_t *p_access )
708 {
709     switch( var_GetInteger( p_access, "dvb-modulation" ) )
710     {
711         case -1:    return QPSK;
712         case 0:     return QAM_AUTO;
713         case 16:    return QAM_16;
714         case 32:    return QAM_32;
715         case 64:    return QAM_64;
716         case 128:   return QAM_128;
717         case 256:   return QAM_256;
718         default:
719             msg_Dbg( p_access, "OFDM modulation not set, using QAM auto");
720             return QAM_AUTO;
721     }
722 }
723 static fe_modulation_t DecodeModulationATSC( access_t *p_access )
724 {
725     switch( var_GetInteger( p_access, "dvb-modulation" ) )
726     {
727         case 8:     return VSB_8;
728         case 16:    return VSB_16;
729         default:
730             msg_Dbg( p_access, "ATSC modulation not set, using VSB 8");
731             return VSB_8;
732     }
733 }
734
735 /*****************************************************************************
736  * FrontendSetQPSK : controls the FE device
737  *****************************************************************************/
738 static fe_sec_voltage_t DecodeVoltage( access_t *p_access )
739 {
740     vlc_value_t         val;
741     fe_sec_voltage_t    fe_voltage;
742
743     var_Get( p_access, "dvb-voltage", &val );
744     msg_Dbg( p_access, "using voltage=%d", val.i_int );
745
746     switch( val.i_int )
747     {
748         case 0: fe_voltage = SEC_VOLTAGE_OFF; break;
749         case 13: fe_voltage = SEC_VOLTAGE_13; break;
750         case 18: fe_voltage = SEC_VOLTAGE_18; break;
751         default:
752             fe_voltage = SEC_VOLTAGE_OFF;
753             msg_Err( p_access, "argument has invalid voltage (%d)", val.i_int );
754             break;
755     }
756     return fe_voltage;
757 }
758
759 static fe_sec_tone_mode_t DecodeTone( access_t *p_access )
760 {
761     vlc_value_t         val;
762     fe_sec_tone_mode_t  fe_tone;
763
764     var_Get( p_access, "dvb-tone", &val );
765     msg_Dbg( p_access, "using tone=%d", val.i_int );
766
767     switch( val.i_int )
768     {
769         case 0: fe_tone = SEC_TONE_OFF; break;
770         case 1: fe_tone = SEC_TONE_ON; break;
771         default:
772             fe_tone = SEC_TONE_OFF;
773             msg_Err( p_access, "argument has invalid tone mode (%d)", val.i_int);
774             break;
775     }
776     return fe_tone;
777 }
778
779 struct diseqc_cmd_t
780 {
781     struct dvb_diseqc_master_cmd cmd;
782     uint32_t wait;
783 };
784
785 static int DoDiseqc( access_t *p_access )
786 {
787     access_sys_t *p_sys = p_access->p_sys;
788     vlc_value_t val;
789     int i_frequency, i_lnb_slof;
790     fe_sec_voltage_t fe_voltage;
791     fe_sec_tone_mode_t fe_tone;
792     int i_err;
793
794     var_Get( p_access, "dvb-frequency", &val );
795     i_frequency = val.i_int;
796     var_Get( p_access, "dvb-lnb-slof", &val );
797     i_lnb_slof = val.i_int;
798
799     var_Get( p_access, "dvb-tone", &val );
800     if( val.i_int == -1 /* auto */ )
801     {
802         if( i_frequency >= i_lnb_slof )
803             val.i_int = 1;
804         else
805             val.i_int = 0;
806         var_Set( p_access, "dvb-tone", val );
807     }
808
809     fe_voltage = DecodeVoltage( p_access );
810     fe_tone = DecodeTone( p_access );
811
812     /* Switch off continuous tone. */
813     if( (i_err = ioctl( p_sys->i_frontend_handle, FE_SET_TONE, SEC_TONE_OFF )) < 0 )
814     {
815         msg_Err( p_access, "ioctl FE_SET_TONE failed, tone=%s (%d) %m",
816                  fe_tone == SEC_TONE_ON ? "on" : "off", i_err );
817         return i_err;
818     }
819
820     /* Configure LNB voltage. */
821     if( (i_err = ioctl( p_sys->i_frontend_handle, FE_SET_VOLTAGE, fe_voltage )) < 0 )
822     {
823         msg_Err( p_access, "ioctl FE_SET_VOLTAGE failed, voltage=%d (%d) %m",
824                  fe_voltage, i_err );
825         return i_err;
826     }
827
828     var_Get( p_access, "dvb-high-voltage", &val );
829     if( (i_err = ioctl( p_sys->i_frontend_handle, FE_ENABLE_HIGH_LNB_VOLTAGE,
830                         val.b_bool )) < 0 && val.b_bool )
831     {
832         msg_Err( p_access,
833                  "ioctl FE_ENABLE_HIGH_LNB_VOLTAGE failed, val=%d (%d) %m",
834                  val.b_bool, i_err );
835     }
836
837     /* Wait for at least 15 ms. */
838     msleep(15000);
839
840     var_Get( p_access, "dvb-satno", &val );
841     if( val.i_int > 0 && val.i_int < 5 )
842     {
843         /* digital satellite equipment control,
844          * specification is available from http://www.eutelsat.com/
845          */
846
847         /* 1.x compatible equipment */
848         struct diseqc_cmd_t cmd =  { {{0xe0, 0x10, 0x38, 0xf0, 0x00, 0x00}, 4}, 0 };
849
850         /* param: high nibble: reset bits, low nibble set bits,
851          * bits are: option, position, polarization, band
852          */
853         cmd.cmd.msg[3] = 0xf0 /* reset bits */
854                           | (((val.i_int - 1) * 4) & 0xc)
855                           | (fe_voltage == SEC_VOLTAGE_13 ? 0 : 2)
856                           | (fe_tone == SEC_TONE_ON ? 1 : 0);
857
858         if( (i_err = ioctl( p_sys->i_frontend_handle, FE_DISEQC_SEND_MASTER_CMD,
859                            &cmd.cmd )) < 0 )
860         {
861             msg_Err( p_access, "ioctl FE_SEND_MASTER_CMD failed (%d) %m",
862                      i_err );
863             return i_err;
864         }
865
866         msleep(15000 + cmd.wait * 1000);
867
868         /* A or B simple diseqc ("diseqc-compatible") */
869         if( (i_err = ioctl( p_sys->i_frontend_handle, FE_DISEQC_SEND_BURST,
870                       ((val.i_int - 1) % 2) ? SEC_MINI_B : SEC_MINI_A )) < 0 )
871         {
872             msg_Err( p_access, "ioctl FE_SEND_BURST failed (%d) %m",
873                      i_err );
874             return i_err;
875         }
876
877         msleep(15000);
878     }
879
880     if( (i_err = ioctl( p_sys->i_frontend_handle, FE_SET_TONE, fe_tone )) < 0 )
881     {
882         msg_Err( p_access, "ioctl FE_SET_TONE failed, tone=%s (%d) %m",
883                  fe_tone == SEC_TONE_ON ? "on" : "off", i_err );
884         return i_err;
885     }
886
887     msleep(50000);
888     return 0;
889 }
890
891 static int FrontendSetQPSK( access_t *p_access )
892 {
893     access_sys_t *p_sys = p_access->p_sys;
894     struct dvb_frontend_parameters fep;
895     int i_ret;
896     vlc_value_t val;
897     int i_frequency, i_lnb_slof = 0, i_lnb_lof1, i_lnb_lof2 = 0;
898
899     /* Prepare the fep structure */
900     var_Get( p_access, "dvb-frequency", &val );
901     i_frequency = val.i_int;
902
903     var_Get( p_access, "dvb-lnb-lof1", &val );
904     if ( val.i_int == 0 )
905     {
906         /* Automatic mode. */
907         if ( i_frequency >= 950000 && i_frequency <= 2150000 )
908         {
909             msg_Dbg( p_access, "frequency %d is in IF-band", i_frequency );
910             i_lnb_lof1 = 0;
911         }
912         else if ( i_frequency >= 2500000 && i_frequency <= 2700000 )
913         {
914             msg_Dbg( p_access, "frequency %d is in S-band", i_frequency );
915             i_lnb_lof1 = 3650000;
916         }
917         else if ( i_frequency >= 3400000 && i_frequency <= 4200000 )
918         {
919             msg_Dbg( p_access, "frequency %d is in C-band (lower)",
920                      i_frequency );
921             i_lnb_lof1 = 5150000;
922         }
923         else if ( i_frequency >= 4500000 && i_frequency <= 4800000 )
924         {
925             msg_Dbg( p_access, "frequency %d is in C-band (higher)",
926                      i_frequency );
927             i_lnb_lof1 = 5950000;
928         }
929         else if ( i_frequency >= 10700000 && i_frequency <= 13250000 )
930         {
931             msg_Dbg( p_access, "frequency %d is in Ku-band",
932                      i_frequency );
933             i_lnb_lof1 = 9750000;
934             i_lnb_lof2 = 10600000;
935             i_lnb_slof = 11700000;
936         }
937         else
938         {
939             msg_Err( p_access, "frequency %d is out of any known band",
940                      i_frequency );
941             msg_Err( p_access, "specify dvb-lnb-lof1 manually for the local "
942                      "oscillator frequency" );
943             return VLC_EGENERIC;
944         }
945         val.i_int = i_lnb_lof1;
946         var_Set( p_access, "dvb-lnb-lof1", val );
947         val.i_int = i_lnb_lof2;
948         var_Set( p_access, "dvb-lnb-lof2", val );
949         val.i_int = i_lnb_slof;
950         var_Set( p_access, "dvb-lnb-slof", val );
951     }
952     else
953     {
954         i_lnb_lof1 = val.i_int;
955         var_Get( p_access, "dvb-lnb-lof2", &val );
956         i_lnb_lof2 = val.i_int;
957         var_Get( p_access, "dvb-lnb-slof", &val );
958         i_lnb_slof = val.i_int;
959     }
960
961     if( i_lnb_slof && i_frequency >= i_lnb_slof )
962     {
963         i_frequency -= i_lnb_lof2;
964     }
965     else
966     {
967         i_frequency -= i_lnb_lof1;
968     }
969     fep.frequency = i_frequency >= 0 ? i_frequency : -i_frequency;
970
971     fep.inversion = DecodeInversion( p_access );
972
973     var_Get( p_access, "dvb-srate", &val );
974     fep.u.qpsk.symbol_rate = val.i_int;
975
976     var_Get( p_access, "dvb-fec", &val );
977     fep.u.qpsk.fec_inner = DecodeFEC( p_access, val.i_int );
978
979     if( DoDiseqc( p_access ) < 0 )
980     {
981         return VLC_EGENERIC;
982     }
983
984     /* Empty the event queue */
985     for( ; ; )
986     {
987         struct dvb_frontend_event event;
988         if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
989               && errno == EWOULDBLOCK )
990             break;
991     }
992
993     /* Now send it all to the frontend device */
994     if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
995     {
996         msg_Err( p_access, "DVB-S: setting frontend failed (%d) %m", i_ret );
997         return VLC_EGENERIC;
998     }
999
1000     return VLC_SUCCESS;
1001 }
1002
1003 /*****************************************************************************
1004  * FrontendSetQAM : controls the FE device
1005  *****************************************************************************/
1006 static int FrontendSetQAM( access_t *p_access )
1007 {
1008     access_sys_t *p_sys = p_access->p_sys;
1009     struct dvb_frontend_parameters fep;
1010     vlc_value_t val;
1011     int i_ret;
1012
1013     /* Prepare the fep structure */
1014
1015     var_Get( p_access, "dvb-frequency", &val );
1016     fep.frequency = val.i_int;
1017
1018     fep.inversion = DecodeInversion( p_access );
1019
1020     var_Get( p_access, "dvb-srate", &val );
1021     fep.u.qam.symbol_rate = val.i_int;
1022
1023     var_Get( p_access, "dvb-fec", &val );
1024     fep.u.qam.fec_inner = DecodeFEC( p_access, val.i_int );
1025
1026     fep.u.qam.modulation = DecodeModulationQAM( p_access );
1027
1028     /* Empty the event queue */
1029     for( ; ; )
1030     {
1031         struct dvb_frontend_event event;
1032         if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
1033               && errno == EWOULDBLOCK )
1034             break;
1035     }
1036
1037     /* Now send it all to the frontend device */
1038     if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
1039     {
1040         msg_Err( p_access, "DVB-C: setting frontend failed (%d): %m", i_ret );
1041         return VLC_EGENERIC;
1042     }
1043
1044     return VLC_SUCCESS;
1045 }
1046
1047 /*****************************************************************************
1048  * FrontendSetOFDM : controls the FE device
1049  *****************************************************************************/
1050 static fe_bandwidth_t DecodeBandwidth( access_t *p_access )
1051 {
1052     vlc_value_t         val;
1053     fe_bandwidth_t      fe_bandwidth = 0;
1054
1055     var_Get( p_access, "dvb-bandwidth", &val );
1056     msg_Dbg( p_access, "using bandwidth=%d", val.i_int );
1057
1058     switch( val.i_int )
1059     {
1060         case 0: fe_bandwidth = BANDWIDTH_AUTO; break;
1061         case 6: fe_bandwidth = BANDWIDTH_6_MHZ; break;
1062         case 7: fe_bandwidth = BANDWIDTH_7_MHZ; break;
1063         case 8: fe_bandwidth = BANDWIDTH_8_MHZ; break;
1064         default:
1065             msg_Dbg( p_access, "terrestrial dvb has bandwidth not set, using auto" );
1066             fe_bandwidth = BANDWIDTH_AUTO;
1067             break;
1068     }
1069     return fe_bandwidth;
1070 }
1071
1072 static fe_transmit_mode_t DecodeTransmission( access_t *p_access )
1073 {
1074     vlc_value_t         val;
1075     fe_transmit_mode_t  fe_transmission = 0;
1076
1077     var_Get( p_access, "dvb-transmission", &val );
1078     msg_Dbg( p_access, "using transmission=%d", val.i_int );
1079
1080     switch( val.i_int )
1081     {
1082         case 0: fe_transmission = TRANSMISSION_MODE_AUTO; break;
1083         case 2: fe_transmission = TRANSMISSION_MODE_2K; break;
1084         case 8: fe_transmission = TRANSMISSION_MODE_8K; break;
1085         default:
1086             msg_Dbg( p_access, "terrestrial dvb has transmission mode not set, using auto");
1087             fe_transmission = TRANSMISSION_MODE_AUTO;
1088             break;
1089     }
1090     return fe_transmission;
1091 }
1092
1093 static fe_guard_interval_t DecodeGuardInterval( access_t *p_access )
1094 {
1095     vlc_value_t         val;
1096     fe_guard_interval_t fe_guard = 0;
1097
1098     var_Get( p_access, "dvb-guard", &val );
1099     msg_Dbg( p_access, "using guard=%d", val.i_int );
1100
1101     switch( val.i_int )
1102     {
1103         case 0: fe_guard = GUARD_INTERVAL_AUTO; break;
1104         case 4: fe_guard = GUARD_INTERVAL_1_4; break;
1105         case 8: fe_guard = GUARD_INTERVAL_1_8; break;
1106         case 16: fe_guard = GUARD_INTERVAL_1_16; break;
1107         case 32: fe_guard = GUARD_INTERVAL_1_32; break;
1108         default:
1109             msg_Dbg( p_access, "terrestrial dvb has guard interval not set, using auto");
1110             fe_guard = GUARD_INTERVAL_AUTO;
1111             break;
1112     }
1113     return fe_guard;
1114 }
1115
1116 static fe_hierarchy_t DecodeHierarchy( access_t *p_access )
1117 {
1118     vlc_value_t         val;
1119     fe_hierarchy_t      fe_hierarchy = 0;
1120
1121     var_Get( p_access, "dvb-hierarchy", &val );
1122     msg_Dbg( p_access, "using hierarchy=%d", val.i_int );
1123
1124     switch( val.i_int )
1125     {
1126         case -1: fe_hierarchy = HIERARCHY_NONE; break;
1127         case 0: fe_hierarchy = HIERARCHY_AUTO; break;
1128         case 1: fe_hierarchy = HIERARCHY_1; break;
1129         case 2: fe_hierarchy = HIERARCHY_2; break;
1130         case 4: fe_hierarchy = HIERARCHY_4; break;
1131         default:
1132             msg_Dbg( p_access, "terrestrial dvb has hierarchy not set, using auto");
1133             fe_hierarchy = HIERARCHY_AUTO;
1134             break;
1135     }
1136     return fe_hierarchy;
1137 }
1138
1139 static int FrontendSetOFDM( access_t * p_access )
1140 {
1141     access_sys_t *p_sys = p_access->p_sys;
1142     struct dvb_frontend_parameters fep;
1143     vlc_value_t val;
1144     int ret;
1145
1146     /* Prepare the fep structure */
1147
1148     var_Get( p_access, "dvb-frequency", &val );
1149     fep.frequency = val.i_int;
1150
1151     fep.inversion = DecodeInversion( p_access );
1152
1153     fep.u.ofdm.bandwidth = DecodeBandwidth( p_access );
1154     var_Get( p_access, "dvb-code-rate-hp", &val );
1155     fep.u.ofdm.code_rate_HP = DecodeFEC( p_access, val.i_int );
1156     var_Get( p_access, "dvb-code-rate-lp", &val );
1157     fep.u.ofdm.code_rate_LP = DecodeFEC( p_access, val.i_int );
1158     fep.u.ofdm.constellation = DecodeModulationOFDM( p_access );
1159     fep.u.ofdm.transmission_mode = DecodeTransmission( p_access );
1160     fep.u.ofdm.guard_interval = DecodeGuardInterval( p_access );
1161     fep.u.ofdm.hierarchy_information = DecodeHierarchy( p_access );
1162
1163     /* Empty the event queue */
1164     for( ; ; )
1165     {
1166         struct dvb_frontend_event event;
1167         if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
1168               && errno == EWOULDBLOCK )
1169             break;
1170     }
1171
1172     /* Now send it all to the frontend device */
1173     if( (ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
1174     {
1175         msg_Err( p_access, "DVB-T: setting frontend failed (%d): %m", ret );
1176         return -1;
1177     }
1178
1179     return VLC_SUCCESS;
1180 }
1181
1182 /*****************************************************************************
1183  * FrontendSetATSC : controls the FE device
1184  *****************************************************************************/
1185 static int FrontendSetATSC( access_t *p_access )
1186 {
1187     access_sys_t *p_sys = p_access->p_sys;
1188     struct dvb_frontend_parameters fep;
1189     vlc_value_t val;
1190     int i_ret;
1191
1192     /* Prepare the fep structure */
1193
1194     var_Get( p_access, "dvb-frequency", &val );
1195     fep.frequency = val.i_int;
1196
1197     fep.u.vsb.modulation = DecodeModulationATSC( p_access );
1198
1199     /* Empty the event queue */
1200     for( ; ; )
1201     {
1202         struct dvb_frontend_event event;
1203         if ( ioctl( p_sys->i_frontend_handle, FE_GET_EVENT, &event ) < 0
1204               && errno == EWOULDBLOCK )
1205             break;
1206     }
1207
1208     /* Now send it all to the frontend device */
1209     if( (i_ret = ioctl( p_sys->i_frontend_handle, FE_SET_FRONTEND, &fep )) < 0 )
1210     {
1211         msg_Err( p_access, "ATSC: setting frontend failed (%d): %m", i_ret );
1212         return VLC_EGENERIC;
1213     }
1214
1215     return VLC_SUCCESS;
1216 }
1217
1218
1219 /*
1220  * Demux
1221  */
1222
1223 /*****************************************************************************
1224  * DMXSetFilter : controls the demux to add a filter
1225  *****************************************************************************/
1226 int E_(DMXSetFilter)( access_t * p_access, int i_pid, int * pi_fd, int i_type )
1227 {
1228     struct dmx_pes_filter_params s_filter_params;
1229     int i_ret;
1230     unsigned int i_adapter, i_device;
1231     char dmx[128];
1232     vlc_value_t val;
1233
1234     var_Get( p_access, "dvb-adapter", &val );
1235     i_adapter = val.i_int;
1236     var_Get( p_access, "dvb-device", &val );
1237     i_device = val.i_int;
1238
1239     if( snprintf( dmx, sizeof(dmx), DMX, i_adapter, i_device )
1240             >= (int)sizeof(dmx) )
1241     {
1242         msg_Err( p_access, "snprintf() truncated string for DMX" );
1243         dmx[sizeof(dmx) - 1] = '\0';
1244     }
1245
1246     msg_Dbg( p_access, "Opening device %s", dmx );
1247     if( (*pi_fd = open(dmx, O_RDWR)) < 0 )
1248     {
1249         msg_Err( p_access, "DMXSetFilter: opening device failed (%m)" );
1250         return VLC_EGENERIC;
1251     }
1252
1253     /* We fill the DEMUX structure : */
1254     s_filter_params.pid     =   i_pid;
1255     s_filter_params.input   =   DMX_IN_FRONTEND;
1256     s_filter_params.output  =   DMX_OUT_TS_TAP;
1257     s_filter_params.flags   =   DMX_IMMEDIATE_START;
1258
1259     switch ( i_type )
1260     {   /* First device */
1261         case 1:
1262             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO0 for PID %d", i_pid);
1263             s_filter_params.pes_type = DMX_PES_VIDEO0;
1264             break;
1265         case 2:
1266             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO0 for PID %d", i_pid);
1267             s_filter_params.pes_type = DMX_PES_AUDIO0;
1268             break;
1269         case 3:
1270             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT0 for PID %d", i_pid);
1271             s_filter_params.pes_type = DMX_PES_TELETEXT0;
1272             break;
1273         case 4:
1274             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE0 for PID %d", i_pid);
1275             s_filter_params.pes_type = DMX_PES_SUBTITLE0;
1276             break;
1277         case 5:
1278             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR0 for PID %d", i_pid);
1279             s_filter_params.pes_type = DMX_PES_PCR0;
1280             break;
1281         /* Second device */
1282         case 6:
1283             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO1 for PID %d", i_pid);
1284             s_filter_params.pes_type = DMX_PES_VIDEO1;
1285             break;
1286         case 7:
1287             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO1 for PID %d", i_pid);
1288             s_filter_params.pes_type = DMX_PES_AUDIO1;
1289             break;
1290         case 8:
1291             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT1 for PID %d", i_pid);
1292             s_filter_params.pes_type = DMX_PES_TELETEXT1;
1293             break;
1294         case 9:
1295             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE1 for PID %d", i_pid);
1296             s_filter_params.pes_type = DMX_PES_SUBTITLE1;
1297             break;
1298         case 10:
1299             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR1 for PID %d", i_pid);
1300             s_filter_params.pes_type = DMX_PES_PCR1;
1301             break;
1302         /* Third device */
1303         case 11:
1304             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO2 for PID %d", i_pid);
1305             s_filter_params.pes_type = DMX_PES_VIDEO2;
1306             break;
1307         case 12:
1308             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO2 for PID %d", i_pid);
1309             s_filter_params.pes_type = DMX_PES_AUDIO2;
1310             break;
1311         case 13:
1312             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT2 for PID %d", i_pid);
1313             s_filter_params.pes_type = DMX_PES_TELETEXT2;
1314             break;
1315         case 14:
1316             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE2 for PID %d", i_pid);
1317             s_filter_params.pes_type = DMX_PES_SUBTITLE2;
1318             break;
1319         case 15:
1320             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR2 for PID %d", i_pid);
1321             s_filter_params.pes_type = DMX_PES_PCR2;
1322             break;
1323         /* Forth device */
1324         case 16:
1325             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_VIDEO3 for PID %d", i_pid);
1326             s_filter_params.pes_type = DMX_PES_VIDEO3;
1327             break;
1328         case 17:
1329             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_AUDIO3 for PID %d", i_pid);
1330             s_filter_params.pes_type = DMX_PES_AUDIO3;
1331             break;
1332         case 18:
1333             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_TELETEXT3 for PID %d", i_pid);
1334             s_filter_params.pes_type = DMX_PES_TELETEXT3;
1335             break;
1336         case 19:
1337             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_SUBTITLE3 for PID %d", i_pid);
1338             s_filter_params.pes_type = DMX_PES_SUBTITLE3;
1339             break;
1340         case 20:
1341             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_PCR3 for PID %d", i_pid);
1342             s_filter_params.pes_type = DMX_PES_PCR3;
1343             break;
1344         /* Usually used by Nova cards */
1345         case 21:
1346         default:
1347             msg_Dbg(p_access, "DMXSetFilter: DMX_PES_OTHER for PID %d", i_pid);
1348             s_filter_params.pes_type = DMX_PES_OTHER;
1349             break;
1350     }
1351
1352     /* We then give the order to the device : */
1353     if( (i_ret = ioctl( *pi_fd, DMX_SET_PES_FILTER, &s_filter_params )) < 0 )
1354     {
1355         msg_Err( p_access, "DMXSetFilter: failed with %d (%m)", i_ret );
1356         return VLC_EGENERIC;
1357     }
1358     return VLC_SUCCESS;
1359 }
1360
1361 /*****************************************************************************
1362  * DMXUnsetFilter : removes a filter
1363  *****************************************************************************/
1364 int E_(DMXUnsetFilter)( access_t * p_access, int i_fd )
1365 {
1366     int i_ret;
1367
1368     if( (i_ret = ioctl( i_fd, DMX_STOP )) < 0 )
1369     {
1370         msg_Err( p_access, "DMX_STOP failed for demux (%d): %m", i_ret );
1371         return i_ret;
1372     }
1373
1374     msg_Dbg( p_access, "DMXUnsetFilter: closing demux %d", i_fd );
1375     close( i_fd );
1376     return VLC_SUCCESS;
1377 }
1378
1379
1380 /*
1381  * DVR device
1382  */
1383
1384 /*****************************************************************************
1385  * DVROpen :
1386  *****************************************************************************/
1387 int E_(DVROpen)( access_t * p_access )
1388 {
1389     access_sys_t *p_sys = p_access->p_sys;
1390     unsigned int i_adapter, i_device;
1391     char dvr[128];
1392     vlc_value_t val;
1393
1394     var_Get( p_access, "dvb-adapter", &val );
1395     i_adapter = val.i_int;
1396     var_Get( p_access, "dvb-device", &val );
1397     i_device = val.i_int;
1398
1399     if( snprintf( dvr, sizeof(dvr), DVR, i_adapter, i_device )
1400             >= (int)sizeof(dvr) )
1401     {
1402         msg_Err( p_access, "snprintf() truncated string for DVR" );
1403         dvr[sizeof(dvr) - 1] = '\0';
1404     }
1405
1406     msg_Dbg( p_access, "Opening device %s", dvr );
1407     if( (p_sys->i_handle = open(dvr, O_RDONLY)) < 0 )
1408     {
1409         msg_Err( p_access, "DVROpen: opening device failed (%m)" );
1410         return VLC_EGENERIC;
1411     }
1412
1413     if( fcntl( p_sys->i_handle, F_SETFL, O_NONBLOCK ) == -1 )
1414     {
1415         msg_Warn( p_access, "DVROpen: couldn't set non-blocking mode (%m)" );
1416     }
1417
1418     return VLC_SUCCESS;
1419 }
1420
1421 /*****************************************************************************
1422  * DVRClose :
1423  *****************************************************************************/
1424 void E_(DVRClose)( access_t * p_access )
1425 {
1426     access_sys_t *p_sys = p_access->p_sys;
1427
1428     close( p_sys->i_handle );
1429 }
1430
1431
1432 /*
1433  * CAM device
1434  */
1435
1436 /*****************************************************************************
1437  * CAMOpen :
1438  *****************************************************************************/
1439 int E_(CAMOpen)( access_t *p_access )
1440 {
1441     access_sys_t *p_sys = p_access->p_sys;
1442     char ca[128];
1443     int i_adapter, i_device;
1444     ca_caps_t caps;
1445
1446     i_adapter = var_GetInteger( p_access, "dvb-adapter" );
1447     i_device = var_GetInteger( p_access, "dvb-device" );
1448
1449     if( snprintf( ca, sizeof(ca), CA, i_adapter, i_device ) >= (int)sizeof(ca) )
1450     {
1451         msg_Err( p_access, "snprintf() truncated string for CA" );
1452         ca[sizeof(ca) - 1] = '\0';
1453     }
1454     memset( &caps, 0, sizeof( ca_caps_t ));
1455
1456     msg_Dbg( p_access, "Opening device %s", ca );
1457     if( (p_sys->i_ca_handle = open(ca, O_RDWR | O_NONBLOCK)) < 0 )
1458     {
1459         msg_Warn( p_access, "CAMInit: opening CAM device failed (%m)" );
1460         p_sys->i_ca_handle = 0;
1461         return VLC_EGENERIC;
1462     }
1463
1464     if ( ioctl( p_sys->i_ca_handle, CA_GET_CAP, &caps ) != 0 )
1465     {
1466         msg_Err( p_access, "CAMInit: ioctl() error getting CAM capabilities" );
1467         close( p_sys->i_ca_handle );
1468         p_sys->i_ca_handle = 0;
1469         return VLC_EGENERIC;
1470     }
1471
1472     /* Output CA capabilities */
1473     msg_Dbg( p_access, "CAMInit: CA interface with %d %s", caps.slot_num,
1474         caps.slot_num == 1 ? "slot" : "slots" );
1475     if ( caps.slot_type & CA_CI )
1476         msg_Dbg( p_access, "CAMInit: CI high level interface type" );
1477     if ( caps.slot_type & CA_CI_LINK )
1478         msg_Dbg( p_access, "CAMInit: CI link layer level interface type" );
1479     if ( caps.slot_type & CA_CI_PHYS )
1480         msg_Dbg( p_access, "CAMInit: CI physical layer level interface type (not supported) " );
1481     if ( caps.slot_type & CA_DESCR )
1482         msg_Dbg( p_access, "CAMInit: built-in descrambler detected" );
1483     if ( caps.slot_type & CA_SC )
1484         msg_Dbg( p_access, "CAMInit: simple smart card interface" );
1485
1486     msg_Dbg( p_access, "CAMInit: %d available %s", caps.descr_num,
1487         caps.descr_num == 1 ? "descrambler (key)" : "descramblers (keys)" );
1488     if ( caps.descr_type & CA_ECD )
1489         msg_Dbg( p_access, "CAMInit: ECD scrambling system supported" );
1490     if ( caps.descr_type & CA_NDS )
1491         msg_Dbg( p_access, "CAMInit: NDS scrambling system supported" );
1492     if ( caps.descr_type & CA_DSS )
1493         msg_Dbg( p_access, "CAMInit: DSS scrambling system supported" );
1494  
1495     if ( caps.slot_num == 0 )
1496     {
1497         msg_Err( p_access, "CAMInit: CAM module with no slots" );
1498         close( p_sys->i_ca_handle );
1499         p_sys->i_ca_handle = 0;
1500         return VLC_EGENERIC;
1501     }
1502
1503     if( caps.slot_type & CA_CI_LINK )
1504     {
1505         p_sys->i_ca_type = CA_CI_LINK;
1506     }
1507     else if( caps.slot_type & CA_CI )
1508     {
1509         p_sys->i_ca_type = CA_CI;
1510     }
1511     else {
1512         p_sys->i_ca_type = -1;
1513         msg_Err( p_access, "CAMInit: incompatible CAM interface" );
1514         close( p_sys->i_ca_handle );
1515         p_sys->i_ca_handle = 0;
1516         return VLC_EGENERIC;
1517     }
1518
1519     p_sys->i_nb_slots = caps.slot_num;
1520     memset( p_sys->pb_active_slot, 0, sizeof(vlc_bool_t) * MAX_CI_SLOTS );
1521     memset( p_sys->pb_slot_mmi_expected, 0, sizeof(vlc_bool_t) * MAX_CI_SLOTS );
1522     memset( p_sys->pb_slot_mmi_undisplayed, 0,
1523             sizeof(vlc_bool_t) * MAX_CI_SLOTS );
1524
1525     return E_(en50221_Init)( p_access );
1526 }
1527
1528 /*****************************************************************************
1529  * CAMPoll :
1530  *****************************************************************************/
1531 int E_(CAMPoll)( access_t * p_access )
1532 {
1533     access_sys_t *p_sys = p_access->p_sys;
1534     int i_ret = VLC_EGENERIC;
1535
1536     if ( p_sys->i_ca_handle == 0 )
1537     {
1538         return VLC_EGENERIC;
1539     }
1540
1541     switch( p_sys->i_ca_type )
1542     {
1543     case CA_CI_LINK:
1544         i_ret = E_(en50221_Poll)( p_access );
1545         break;
1546     case CA_CI:
1547         i_ret = VLC_SUCCESS;
1548         break;
1549     default:
1550         msg_Err( p_access, "CAMPoll: This should not happen" );
1551         break;
1552     }
1553
1554     return i_ret;
1555 }
1556
1557 #ifdef ENABLE_HTTPD
1558 /*****************************************************************************
1559  * CAMStatus :
1560  *****************************************************************************/
1561 void E_(CAMStatus)( access_t * p_access )
1562 {
1563     access_sys_t *p_sys = p_access->p_sys;
1564     char *p;
1565     ca_caps_t caps;
1566     int i_slot, i;
1567
1568     if ( p_sys->psz_request != NULL && *p_sys->psz_request )
1569     {
1570         /* Check if we have an undisplayed MMI message : in that case we ignore
1571          * the user input to avoid confusing the CAM. */
1572         for ( i_slot = 0; i_slot < p_sys->i_nb_slots; i_slot++ )
1573         {
1574             if ( p_sys->pb_slot_mmi_undisplayed[i_slot] == VLC_TRUE )
1575             {
1576                 p_sys->psz_request = NULL;
1577                 msg_Dbg( p_access,
1578                          "ignoring user request because of a new MMI object" );
1579                 break;
1580             }
1581         }
1582     }
1583
1584     if ( p_sys->psz_request != NULL && *p_sys->psz_request )
1585     {
1586         /* We have a mission to accomplish. */
1587         en50221_mmi_object_t mmi_object;
1588         char *psz_request = p_sys->psz_request;
1589         char psz_value[255];
1590         int i_slot;
1591         vlc_bool_t b_ok = VLC_FALSE;
1592
1593         p_sys->psz_request = NULL;
1594
1595         if ( E_(HTTPExtractValue)( psz_request, "slot", psz_value,
1596                                    sizeof(psz_value) ) == NULL )
1597         {
1598             p_sys->psz_mmi_info = strdup( "invalid request parameter\n" );
1599             goto out;
1600         }
1601         i_slot = atoi(psz_value);
1602
1603         if ( E_(HTTPExtractValue)( psz_request, "open", psz_value,
1604                                    sizeof(psz_value) ) != NULL )
1605         {
1606             E_(en50221_OpenMMI)( p_access, i_slot );
1607             return;
1608         }
1609
1610         if ( E_(HTTPExtractValue)( psz_request, "close", psz_value,
1611                                    sizeof(psz_value) ) != NULL )
1612         {
1613             E_(en50221_CloseMMI)( p_access, i_slot );
1614             return;
1615         }
1616
1617         if ( E_(HTTPExtractValue)( psz_request, "cancel", psz_value,
1618                                    sizeof(psz_value) ) == NULL )
1619         {
1620             b_ok = VLC_TRUE;
1621         }
1622
1623         if ( E_(HTTPExtractValue)( psz_request, "type", psz_value,
1624                                    sizeof(psz_value) ) == NULL )
1625         {
1626             p_sys->psz_mmi_info = strdup( "invalid request parameter\n" );
1627             goto out;
1628         }
1629
1630         if ( !strcmp( psz_value, "enq" ) )
1631         {
1632             mmi_object.i_object_type = EN50221_MMI_ANSW;
1633             mmi_object.u.answ.b_ok = b_ok;
1634             if ( b_ok == VLC_FALSE )
1635             {
1636                 mmi_object.u.answ.psz_answ = strdup("");
1637             }
1638             else
1639             {
1640                 if ( E_(HTTPExtractValue)( psz_request, "answ", psz_value,
1641                                            sizeof(psz_value) ) == NULL )
1642                 {
1643                     p_sys->psz_mmi_info = strdup( "invalid request parameter\n" );
1644                     goto out;
1645                 }
1646
1647                 mmi_object.u.answ.psz_answ = strdup(psz_value);
1648             }
1649         }
1650         else
1651         {
1652             mmi_object.i_object_type = EN50221_MMI_MENU_ANSW;
1653             if ( b_ok == VLC_FALSE )
1654             {
1655                 mmi_object.u.menu_answ.i_choice = 0;
1656             }
1657             else
1658             {
1659                 if ( E_(HTTPExtractValue)( psz_request, "choice", psz_value,
1660                                            sizeof(psz_value) ) == NULL )
1661                     mmi_object.u.menu_answ.i_choice = 0;
1662                 else
1663                     mmi_object.u.menu_answ.i_choice = atoi(psz_value);
1664             }
1665         }
1666
1667         E_(en50221_SendMMIObject)( p_access, i_slot, &mmi_object );
1668         return;
1669     }
1670
1671     /* Check that we have all necessary MMI information. */
1672     for ( i_slot = 0; i_slot < p_sys->i_nb_slots; i_slot++ )
1673     {
1674         if ( p_sys->pb_slot_mmi_expected[i_slot] == VLC_TRUE )
1675             return;
1676     }
1677
1678     p = p_sys->psz_mmi_info = malloc( 10000 );
1679
1680     if ( ioctl( p_sys->i_ca_handle, CA_GET_CAP, &caps ) != 0 )
1681     {
1682         char buf[1000];
1683         strerror_r( errno, buf, sizeof( buf ) );
1684         p += sprintf( p, "ioctl CA_GET_CAP failed (%s)\n", buf );
1685         goto out;
1686     }
1687
1688     /* Output CA capabilities */
1689     p += sprintf( p, "CA interface with %d %s, type:\n<table>", caps.slot_num,
1690                   caps.slot_num == 1 ? "slot" : "slots" );
1691 #define CHECK_CAPS( x, s )                                                  \
1692     if ( caps.slot_type & (CA_##x) )                                        \
1693         p += sprintf( p, "<tr><td>" s "</td></tr>\n" );
1694
1695     CHECK_CAPS( CI, "CI high level interface" );
1696     CHECK_CAPS( CI_LINK, "CI link layer level interface" );
1697     CHECK_CAPS( CI_PHYS, "CI physical layer level interface (not supported)" );
1698     CHECK_CAPS( DESCR, "built-in descrambler" );
1699     CHECK_CAPS( SC, "simple smartcard interface" );
1700 #undef CHECK_CAPS
1701
1702     p += sprintf( p, "</table>%d available %s\n<table>", caps.descr_num,
1703         caps.descr_num == 1 ? "descrambler (key)" : "descramblers (keys)" );
1704 #define CHECK_DESC( x )                                                     \
1705     if ( caps.descr_type & (CA_##x) )                                       \
1706         p += sprintf( p, "<tr><td>" STRINGIFY(x) "</td></tr>\n" );
1707
1708     CHECK_DESC( ECD );
1709     CHECK_DESC( NDS );
1710     CHECK_DESC( DSS );
1711 #undef CHECK_DESC
1712
1713     p += sprintf( p, "</table>" );
1714
1715     for ( i_slot = 0; i_slot < p_sys->i_nb_slots; i_slot++ )
1716     {
1717         ca_slot_info_t sinfo;
1718
1719         p_sys->pb_slot_mmi_undisplayed[i_slot] = VLC_FALSE;
1720         p += sprintf( p, "<p>CA slot #%d: ", i_slot );
1721
1722         sinfo.num = i_slot;
1723         if ( ioctl( p_sys->i_ca_handle, CA_GET_SLOT_INFO, &sinfo ) != 0 )
1724         {
1725             char buf[1000];
1726             strerror_r( errno, buf, sizeof( buf ) );
1727             p += sprintf( p, "ioctl CA_GET_SLOT_INFO failed (%s)<br>\n", buf );
1728             continue;
1729         }
1730
1731 #define CHECK_TYPE( x, s )                                                  \
1732         if ( sinfo.type & (CA_##x) )                                        \
1733             p += sprintf( p, "%s", s );
1734
1735         CHECK_TYPE( CI, "high level, " );
1736         CHECK_TYPE( CI_LINK, "link layer level, " );
1737         CHECK_TYPE( CI_PHYS, "physical layer level, " );
1738 #undef CHECK_TYPE
1739
1740         if ( sinfo.flags & CA_CI_MODULE_READY )
1741         {
1742             en50221_mmi_object_t *p_object = E_(en50221_GetMMIObject)( p_access,
1743                                                                        i_slot );
1744
1745             p += sprintf( p, "module present and ready<p>\n" );
1746             p += sprintf( p, "<form action=index.html method=get>\n" );
1747             p += sprintf( p, "<input type=hidden name=slot value=\"%d\">\n",
1748                           i_slot );
1749
1750             if ( p_object == NULL )
1751             {
1752                 p += sprintf( p, "<input type=submit name=open value=\"Open session\">\n" );
1753             }
1754             else
1755             {
1756                 switch ( p_object->i_object_type )
1757                 {
1758                 case EN50221_MMI_ENQ:
1759                     p += sprintf( p, "<input type=hidden name=type value=enq>\n" );
1760                     p += sprintf( p, "<table border=1><tr><th>%s</th></tr>\n",
1761                                   p_object->u.enq.psz_text );
1762                     if ( p_object->u.enq.b_blind == VLC_FALSE )
1763                         p += sprintf( p, "<tr><td><input type=text name=answ></td></tr>\n" );
1764                     else
1765                         p += sprintf( p, "<tr><td><input type=password name=answ></td></tr>\n" );
1766                     break;
1767
1768                 case EN50221_MMI_MENU:
1769                     p += sprintf( p, "<input type=hidden name=type value=menu>\n" );
1770                     p += sprintf( p, "<table border=1><tr><th>%s</th></tr>\n",
1771                                   p_object->u.menu.psz_title );
1772                     p += sprintf( p, "<tr><td>%s</td></tr><tr><td>\n",
1773                                   p_object->u.menu.psz_subtitle );
1774                     for ( i = 0; i < p_object->u.menu.i_choices; i++ )
1775                         p += sprintf( p, "<input type=radio name=choice value=\"%d\">%s<br>\n", i + 1, p_object->u.menu.ppsz_choices[i] );
1776                     p += sprintf( p, "</td></tr><tr><td>%s</td></tr>\n",
1777                                   p_object->u.menu.psz_bottom );
1778                     break;
1779
1780                 case EN50221_MMI_LIST:
1781                     p += sprintf( p, "<input type=hidden name=type value=menu>\n" );
1782                     p += sprintf( p, "<input type=hidden name=choice value=0>\n" );
1783                     p += sprintf( p, "<table border=1><tr><th>%s</th></tr>\n",
1784                                   p_object->u.menu.psz_title );
1785                     p += sprintf( p, "<tr><td>%s</td></tr><tr><td>\n",
1786                                   p_object->u.menu.psz_subtitle );
1787                     for ( i = 0; i < p_object->u.menu.i_choices; i++ )
1788                         p += sprintf( p, "%s<br>\n",
1789                                       p_object->u.menu.ppsz_choices[i] );
1790                     p += sprintf( p, "</td></tr><tr><td>%s</td></tr>\n",
1791                                   p_object->u.menu.psz_bottom );
1792                     break;
1793
1794                 default:
1795                     p += sprintf( p, "<table><tr><th>Unknown MMI object type</th></tr>\n" );
1796                 }
1797
1798                 p += sprintf( p, "</table><p><input type=submit name=ok value=\"OK\">\n" );
1799                 p += sprintf( p, "<input type=submit name=cancel value=\"Cancel\">\n" );
1800                 p += sprintf( p, "<input type=submit name=close value=\"Close Session\">\n" );
1801             }
1802             p += sprintf( p, "</form>\n" );
1803         }
1804         else if ( sinfo.flags & CA_CI_MODULE_PRESENT )
1805             p += sprintf( p, "module present, not ready<br>\n" );
1806         else
1807             p += sprintf( p, "module not present<br>\n" );
1808     }
1809
1810 out:
1811     vlc_mutex_lock( &p_sys->httpd_mutex );
1812     p_sys->b_request_mmi_info = VLC_FALSE;
1813     vlc_cond_signal( &p_sys->httpd_cond );
1814     vlc_mutex_unlock( &p_sys->httpd_mutex );
1815 }
1816 #endif
1817
1818 /*****************************************************************************
1819  * CAMSet :
1820  *****************************************************************************/
1821 int E_(CAMSet)( access_t * p_access, dvbpsi_pmt_t *p_pmt )
1822 {
1823     access_sys_t *p_sys = p_access->p_sys;
1824
1825     if( p_sys->i_ca_handle == 0 )
1826     {
1827         dvbpsi_DeletePMT( p_pmt );
1828         return VLC_EGENERIC;
1829     }
1830
1831     E_(en50221_SetCAPMT)( p_access, p_pmt );
1832
1833     return VLC_SUCCESS;
1834 }
1835
1836 /*****************************************************************************
1837  * CAMClose :
1838  *****************************************************************************/
1839 void E_(CAMClose)( access_t * p_access )
1840 {
1841     access_sys_t *p_sys = p_access->p_sys;
1842
1843     E_(en50221_End)( p_access );
1844
1845     if ( p_sys->i_ca_handle )
1846     {
1847         close( p_sys->i_ca_handle );
1848     }
1849 }
1850