]> git.sesse.net Git - vlc/blob - modules/access/dvb/access.c
Fix bug for DVB-T tuning. The code always used default upper and lower frequencies...
[vlc] / modules / access / dvb / access.c
1 /*****************************************************************************
2  * access.c: DVB card input v4l2 only
3  *****************************************************************************
4  * Copyright (C) 1998-2003 VideoLAN
5  *
6  * Authors: Johan Bilien <jobi@via.ecp.fr>
7  *          Jean-Paul Saman <jpsaman@wxs.nl>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28 #include <stdio.h>
29 #include <stdlib.h>
30
31 #include <vlc/vlc.h>
32 #include <vlc/input.h>
33
34 #include "../../demux/mpeg/system.h"
35
36 #ifdef HAVE_UNISTD_H
37 #   include <unistd.h>
38 #endif
39
40 #include <fcntl.h>
41 #include <sys/types.h>
42
43 #ifdef HAVE_ERRNO_H
44 #    include <string.h>
45 #    include <errno.h>
46 #endif
47
48 #ifdef STRNCASECMP_IN_STRINGS_H
49 #   include <strings.h>
50 #endif
51
52 /* DVB Card Drivers */
53 #include <linux/dvb/dmx.h>
54 #include <linux/dvb/frontend.h>
55
56 #include "dvb.h"
57
58 #define SATELLITE_READ_ONCE 3
59
60 /*****************************************************************************
61  * Local prototypes
62  *****************************************************************************/
63 static ssize_t SatelliteRead( input_thread_t * p_input, byte_t * p_buffer,
64                               size_t i_len);
65 static int     SatelliteSetArea    ( input_thread_t *, input_area_t * );
66 static int     SatelliteSetProgram ( input_thread_t *, pgrm_descriptor_t * );
67 static void    SatelliteSeek       ( input_thread_t *, off_t );
68
69 /*****************************************************************************
70  * Open: open the frontend device
71  *****************************************************************************/
72 int E_(Open) ( vlc_object_t *p_this )
73 {
74     struct dvb_frontend_info frontend_info;
75     struct dvb_frontend_parameters fep;
76     input_thread_t *    p_input = (input_thread_t *)p_this;
77     input_socket_t *    p_satellite;
78     char *              psz_parser;
79     char *              psz_next;
80     int                 i_fd = 0;
81     unsigned int        u_adapter = 1;
82     unsigned int        u_device = 0;
83     unsigned int        u_freq = 0;
84     unsigned int        u_srate = 0;
85     unsigned int        u_lnb_lof1;
86     unsigned int        u_lnb_lof2;
87     unsigned int        u_lnb_slof;
88     int                 i_bandwidth = 0;
89     int                 i_modulation = 0;
90     int                 i_guard = 0;
91     int                 i_transmission = 0;
92     int                 i_hierarchy = 0;
93     vlc_bool_t          b_polarisation = 0;
94     int                 i_fec = 0;
95     int                 i_code_rate_HP = 0;
96     int                 i_code_rate_LP = 0;
97     vlc_bool_t          b_diseqc;
98     vlc_bool_t          b_probe;
99     char                dvr[] = DVR;
100     char                frontend[] = FRONTEND;
101     int                 i_len = 0;
102     vlc_value_t         val;
103     int                 i_test;
104
105     
106     /* parse the options passed in command line : */
107     psz_parser = strdup( p_input->psz_name );
108
109     if( !psz_parser )
110     {
111         return( -1 );
112     }
113
114     // Get adapter and device number to use for this dvb card
115     u_adapter = config_GetInt( p_input, "adapter" );
116     u_device  = config_GetInt( p_input, "device" );
117   
118     /* Get antenna configuration options */
119     b_diseqc = config_GetInt( p_input, "diseqc" );
120     u_lnb_lof1 = config_GetInt( p_input, "lnb-lof1" );
121     u_lnb_lof2 = config_GetInt( p_input, "lnb-lof2" );
122     u_lnb_slof = config_GetInt( p_input, "lnb-slof" );
123
124     /*Get modulation parameters*/
125     i_bandwidth = config_GetInt( p_input, "bandwidth");
126     i_code_rate_HP = config_GetInt(p_input, "code-rate-hp");
127     i_code_rate_LP = config_GetInt(p_input, "code-rate-lp");
128     i_modulation  = config_GetInt(p_input, "modulation");
129     i_transmission = config_GetInt(p_input, "transmission");
130     i_guard = config_GetInt(p_input, "guard");
131     i_hierarchy = config_GetInt(p_input, "hierarchy");
132
133
134     /* Determine frontend device information and capabilities */
135     b_probe = config_GetInt( p_input, "probe" );
136     if (b_probe)
137     {
138         if ( ioctl_InfoFrontend(p_input, &frontend_info, u_adapter, u_device) < 0 )
139         {
140             msg_Err( p_input, "(access) cannot determine frontend info" );
141             return -1;
142         }
143     }
144     else /* no frontend probing is done so use default border values. */
145     {
146         msg_Dbg( p_input, "using default values for frontend info" );
147         i_len = sizeof(FRONTEND);
148         if (snprintf(frontend, sizeof(FRONTEND), FRONTEND, u_adapter, u_device) >= i_len)
149         {
150             msg_Err( p_input, "snprintf() truncated string for FRONTEND" );
151             frontend[sizeof(FRONTEND)] = '\0';
152         }
153         strncpy(frontend_info.name, frontend, 128);
154
155         msg_Dbg(p_input, "method of access is %s", p_input->psz_access);
156         
157         frontend_info.type = FE_QPSK;
158         if (strncmp( p_input->psz_access, "qpsk",4 ) ==0)
159             frontend_info.type = FE_QPSK;
160         else if (strncmp( p_input->psz_access, "cable",5 ) ==0)
161             frontend_info.type = FE_QAM;
162         else if (strncmp( p_input->psz_access, "terrestrial",11) ==0)
163             frontend_info.type = FE_OFDM;
164
165 //        frontend_info.frequency_max =   12999000; /* in KHz, lnb_lof2 */
166 //        frontend_info.frequency_min =    9750000; /* lnb_lof1 */
167
168         frontend_info.frequency_max = u_lnb_lof2; /* in KHz, lnb_lof2 */
169         frontend_info.frequency_min = u_lnb_lof1; /* lnb_lof1 */
170
171         frontend_info.symbol_rate_max = 30000000;
172         frontend_info.symbol_rate_min =  1000000;
173     }
174     
175     /* Register Callback functions */
176     p_input->pf_read = SatelliteRead;
177     p_input->pf_set_program = SatelliteSetProgram;
178     p_input->pf_set_area = SatelliteSetArea;
179     p_input->pf_seek = SatelliteSeek;
180
181     i_test = strtol( psz_parser, &psz_next, 10 );
182     if ( psz_next == psz_parser )
183     {
184         for ( ;; )
185         {
186             if( !strncmp( psz_parser, "frequency=",
187                                strlen( "frequency=" ) ) )
188             {
189                 u_freq =
190                   strtol( psz_parser + strlen( "frequency=" ),
191                             &psz_parser, 0 );
192             }
193             else if( !strncmp( psz_parser, "polarization=",
194                                strlen( "polarization=" ) ) )
195             {
196                 char *psz_parser_init;
197                 psz_parser += strlen( "polarization=" );
198                 psz_parser_init = psz_parser;
199                 while ( *psz_parser != ':')
200                 {
201                 psz_parser++;
202                 }
203                 if ((!strncmp( psz_parser_init, "V" ,
204                      psz_parser - psz_parser_init ) ) || 
205                    (!strncmp( psz_parser_init, "V" ,
206                      psz_parser - psz_parser_init ) ) )
207                 {
208                     b_polarisation = VLC_FALSE;
209                 }
210                 else if ((!strncmp( psz_parser_init, "H" ,
211                      psz_parser - psz_parser_init ) ) ||
212                    (!strncmp( psz_parser_init, "h" ,
213                      psz_parser - psz_parser_init ) ) )
214
215                 {
216                     b_polarisation = VLC_TRUE;
217                 }
218             }
219             else if( !strncmp( psz_parser, "fec=",
220                                strlen( "fec=" ) ) )
221             {
222                 i_fec =
223                 (int)strtol( psz_parser + strlen( "fec=" ),
224                             &psz_parser, 0 );
225             }
226             else if( !strncmp( psz_parser, "srate=",
227                                strlen( "srate=" ) ) )
228             {
229                 u_srate =
230                 (unsigned int)strtol( psz_parser + strlen( "srate=" ),
231                             &psz_parser, 0 );
232             }
233             else if( !strncmp( psz_parser, "program=",
234                                strlen( "program=" ) ) )
235             {
236                 val.i_int = (int)strtol( psz_parser + strlen( "program=" ),
237                             &psz_parser, 0 );
238                 var_Set( p_input, "program", val );
239             }
240             else if( !strncmp( psz_parser, "diseqc",
241                                strlen( "disecq" ) ) )
242             {
243                 psz_parser += strlen("disecq");
244                 b_diseqc = VLC_TRUE;
245             }
246             else if( !strncmp( psz_parser, "lnb-lof1=",
247                                strlen( "lnb-lof1=" ) ) )
248             {
249                 u_lnb_lof1 =
250                 (unsigned int)strtol( psz_parser + strlen( "lnb_lof1=" ),
251                             &psz_parser, 0 );
252             }
253             else if( !strncmp( psz_parser, "lnb-lof2=",
254                                strlen( "lnb-lof2=" ) ) )
255             {
256                 u_lnb_lof2 =
257                 (unsigned int)strtol( psz_parser + strlen( "lnb_lof2=" ),
258                             &psz_parser, 0 );
259             }
260             else if( !strncmp( psz_parser, "lnb-slof=",
261                                strlen( "lnb-slof=" ) ) )
262             {
263                 u_lnb_slof =
264                 (unsigned int)strtol( psz_parser + strlen( "lnb_slof=" ),
265                             &psz_parser, 0 );
266             }
267             else if( !strncmp( psz_parser, "device=",
268                                strlen( "device=" ) ) )
269             {
270                 u_device =
271                 (unsigned int)strtol( psz_parser + strlen( "device=" ),
272                             &psz_parser, 0 );
273             }
274             else if( !strncmp( psz_parser, "adapter=",
275                                strlen( "adapter=" ) ) )
276             {
277                 u_adapter =
278                 (unsigned int)strtol( psz_parser + strlen( "adapter=" ),
279                             &psz_parser, 0 );
280             }
281             else if (!strncmp( psz_parser, "modulation=",
282                                strlen( "modulation=" ) ) )
283             {
284                 i_modulation = (int)strtol( psz_parser + strlen( "modulation=" ),
285                             &psz_parser, 0 );
286             }
287             else if (!strncmp( psz_parser, "bandwidth=",
288                                strlen( "bandwidth=" ) ) )
289             {
290                 i_bandwidth = (int)strtol( psz_parser + strlen( "bandwidth=" ),
291                             &psz_parser, 0 );
292             }
293             else if (!strncmp( psz_parser, "guard=",
294                                strlen( "guard=" ) ) )
295             {
296                 i_guard = (int)strtol( psz_parser + strlen( "guard=" ),
297                             &psz_parser, 0 );
298             }
299             else if (!strncmp( psz_parser, "transmission=",
300                                strlen( "transmission=" ) ) )
301             {
302                 i_transmission = (int)strtol( psz_parser + 
303                             strlen( "transmission=" ),&psz_parser, 0 );
304             }
305             else if (!strncmp( psz_parser, "hierarchy=",
306                                strlen( "hierarchy=" ) ) )
307             {
308                 i_hierarchy = (int)strtol( psz_parser + 
309                                 strlen( "hierarchy=" ),&psz_parser, 0 );
310             }
311             else if (!strncmp( psz_parser, "code-rate-HP=",
312                                strlen( "code-rate-HP=" ) ) )
313             {
314                 i_code_rate_HP = (int)strtol( psz_parser + 
315                                 strlen( "code-rate-HP=" ),&psz_parser, 0 );
316             }
317             else if (!strncmp( psz_parser, "code-rate-LP=",
318                                strlen( "code-rate-LP=" ) ) )
319             {
320                 i_code_rate_LP = (int)strtol( psz_parser +
321                                 strlen( "code-rate-LP=" ),&psz_parser, 0 );
322             }
323             else if( !strncmp( psz_parser, "probe",
324                                strlen( "probe" ) ) )
325             {
326                 psz_parser += strlen("probe");
327                 b_probe = VLC_TRUE;
328             }
329             if( *psz_parser )
330                 psz_parser++;
331             else
332             break;
333         }
334     }
335     else
336     {
337         msg_Warn(p_input,"DVV Input syntax has changed, please see documentation for further informations");
338         u_freq = (unsigned int)i_test;
339         if( *psz_next )
340         {
341             psz_parser = psz_next + 1;
342             b_polarisation = (vlc_bool_t)strtol( psz_parser, &psz_next, 10 );
343             if( *psz_next )
344             {
345                 psz_parser = psz_next + 1;
346                 i_fec = (int)strtol( psz_parser, &psz_next, 10 );
347                 if( *psz_next )
348                 {
349                     psz_parser = psz_next + 1;
350                     u_srate = (unsigned int)strtol( psz_parser, &psz_next, 10 );
351                 }
352             }
353         }
354     }
355    
356     /* Validating input values */
357     if ( ((u_freq) > frontend_info.frequency_max) ||
358          ((u_freq) < frontend_info.frequency_min) )
359     {
360         msg_Warn( p_input, "invalid frequency %d (KHz), using default one", u_freq );
361         u_freq = config_GetInt( p_input, "frequency" );
362         if ( ((u_freq) > frontend_info.frequency_max) ||
363              ((u_freq) < frontend_info.frequency_min) )
364         {
365             msg_Err( p_input, "invalid default frequency" );
366             return -1;
367         }
368     }
369
370     /* Workaround for backwards compatibility */
371     if (strncmp( p_input->psz_access, "satellite", 9 ) ==0)
372     {
373         msg_Warn( p_input, "invalid symbol rate %d possibly specified in MHz, trying value *1000 KHz", u_freq );
374         u_srate *= 1000;
375     }
376     
377     if ( ((u_srate) > frontend_info.symbol_rate_max) ||
378          ((u_srate) < frontend_info.symbol_rate_min) )
379     {
380         msg_Warn( p_input, "invalid symbol rate, using default one" );
381         u_srate = config_GetInt( p_input, "symbol-rate" );
382         if ( ((u_srate) > frontend_info.symbol_rate_max) ||
383              ((u_srate) < frontend_info.symbol_rate_min) )
384         {
385             msg_Err( p_input, "invalid default symbol rate" );
386             return -1;
387         }
388     }
389
390     if( b_polarisation && (b_polarisation != 1) )
391     {
392         msg_Warn( p_input, "invalid polarization, using default one" );
393         b_polarisation = config_GetInt( p_input, "polarization" );
394         if( b_polarisation && b_polarisation != 1 )
395         {
396             msg_Err( p_input, "invalid default polarization" );
397             return -1;
398         }
399     }
400
401     if( (i_fec > 9) || (i_fec < 1) )
402     {
403         msg_Warn( p_input, "invalid FEC, using default one" );
404         i_fec = config_GetInt( p_input, "fec" );
405         if( (i_fec > 9) || (i_fec < 1) )
406         {
407             msg_Err( p_input, "invalid default FEC" );
408             return -1;
409         }
410     }
411     /* Setting frontend parameters for tuning the hardware */      
412     switch( frontend_info.type )
413     {
414         /* DVB-S: satellite and budget cards (nova) */
415         case FE_QPSK:
416             fep.frequency = u_freq; /* KHz */
417             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
418             fep.u.qpsk.symbol_rate = u_srate;
419             fep.u.qpsk.fec_inner = dvb_DecodeFEC(p_input, i_fec); 
420             msg_Dbg( p_input, "satellite (QPSK) frontend found on %s", frontend_info.name );
421             break;
422             
423         /* DVB-C */
424         case FE_QAM:
425             fep.frequency = u_freq; /* KHz */
426             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
427             fep.u.qam.symbol_rate = u_srate;
428             fep.u.qam.fec_inner = dvb_DecodeFEC(p_input, i_fec); 
429             fep.u.qam.modulation = dvb_DecodeModulation(p_input, i_modulation); 
430             msg_Dbg( p_input, "cable (QAM) frontend found on %s", frontend_info.name );
431             break;
432
433         /* DVB-T */
434         case FE_OFDM:
435             fep.frequency = u_freq; /* KHz */
436             fep.inversion = dvb_DecodeInversion(p_input, (int) b_polarisation);
437             fep.u.ofdm.bandwidth = dvb_DecodeBandwidth(p_input, i_bandwidth);
438             fep.u.ofdm.code_rate_HP = dvb_DecodeFEC(p_input, i_code_rate_HP); 
439             fep.u.ofdm.code_rate_LP = dvb_DecodeFEC(p_input, i_code_rate_LP);
440             fep.u.ofdm.constellation = dvb_DecodeModulation(p_input, i_modulation); 
441             fep.u.ofdm.transmission_mode = dvb_DecodeTransmission(p_input, i_transmission);
442             fep.u.ofdm.guard_interval = dvb_DecodeGuardInterval(p_input, i_guard);
443             fep.u.ofdm.hierarchy_information = dvb_DecodeHierarchy(p_input, i_hierarchy);
444             msg_Dbg( p_input, "terrestrial (OFDM) frontend found on %s", frontend_info.name );
445             break;
446
447         default:
448             msg_Err( p_input, "Could not determine frontend type on %s", frontend_info.name );
449             return -1;
450     }
451
452     /* Initialise structure */
453     p_satellite = malloc( sizeof( input_socket_t ) );
454
455     if( p_satellite == NULL )
456     {
457         msg_Err( p_input, "out of memory" );
458         return -1;
459     }
460
461     p_input->p_access_data = (void *)p_satellite;
462
463     /* Open the DVR device */
464     i_len = sizeof(DVR);
465     if (snprintf(dvr, sizeof(DVR), DVR, u_adapter, u_device) >= i_len)
466     {
467         msg_Err( p_input, "snprintf() truncated string for DVR" );
468         dvr[sizeof(DVR)] = '\0';
469     }
470     msg_Dbg( p_input, "opening DVR device '%s'", dvr );
471
472     if( (p_satellite->i_handle = open( dvr,
473                                    /*O_NONBLOCK | O_LARGEFILE*/0 )) == (-1) )
474     {
475 #   ifdef HAVE_ERRNO_H
476         msg_Warn( p_input, "cannot open `%s' (%s)", dvr, strerror(errno) );
477 #   else
478         msg_Warn( p_input, "cannot open `%s'", dvr );
479 #   endif
480         free( p_satellite );
481         return -1;
482     }
483
484     /* Initialize the Satellite Card */
485     switch (ioctl_SetFrontend (p_input, fep, b_polarisation,
486                                u_lnb_lof1, u_lnb_lof2, u_lnb_slof,
487                                u_adapter, u_device ))
488     {
489         case -2:
490             msg_Err( p_input, "frontend returned an unexpected event" );
491             close( p_satellite->i_handle );
492             free( p_satellite );
493             return -1;
494         case -3:
495             msg_Err( p_input, "frontend returned no event" );
496             close( p_satellite->i_handle );
497             free( p_satellite );
498             return -1;
499         case -4:
500             msg_Err( p_input, "frontend: timeout when polling for event" );
501             close( p_satellite->i_handle );
502             free( p_satellite );
503             return -1;
504         case -5:
505             msg_Err( p_input, "an error occured when polling frontend device" );
506             close( p_satellite->i_handle );
507             free( p_satellite );
508             return -1;
509         case -1:
510             msg_Err( p_input, "frontend returned a failure event" );
511             close( p_satellite->i_handle );
512             free( p_satellite );
513             return -1;
514         default:
515             break;
516     }
517
518     msg_Dbg( p_input, "setting filter on PAT" );
519
520     /* Set Filter on PAT packet */
521     if ( ioctl_SetDMXFilter(p_input, 0, &i_fd, 21, u_adapter, u_device ) < 0 )
522     {
523 #   ifdef HAVE_ERRNO_H
524         msg_Err( p_input, "an error occured when setting filter on PAT (%s)", strerror(errno) );
525 #   else
526         msg_Err( p_input, "an error occured when setting filter on PAT" );
527 #   endif        
528         close( p_satellite->i_handle );
529         free( p_satellite );
530         return -1;
531     }
532
533     if( input_InitStream( p_input, sizeof( stream_ts_data_t ) ) == -1 )
534     {
535         msg_Err( p_input, "could not initialize stream structure" );
536         close( p_satellite->i_handle );
537         free( p_satellite );
538         return( -1 );
539     }
540
541     vlc_mutex_lock( &p_input->stream.stream_lock );
542
543     p_input->stream.b_pace_control = 1;
544     p_input->stream.b_seekable = 0;
545     p_input->stream.p_selected_area->i_tell = 0;
546
547     vlc_mutex_unlock( &p_input->stream.stream_lock );
548
549     p_input->i_mtu = SATELLITE_READ_ONCE * TS_PACKET_SIZE;
550     p_input->stream.i_method = INPUT_METHOD_SATELLITE;
551
552     return 0;
553 }
554
555 /*****************************************************************************
556  * Close : Close the device
557  *****************************************************************************/
558 void E_(Close) ( vlc_object_t *p_this )
559 {
560     input_thread_t *    p_input = (input_thread_t *)p_this;
561     input_socket_t *    p_satellite;
562     unsigned int        i_es_index;
563
564     if ( p_input->stream.p_selected_program )
565     {
566         for ( i_es_index = 1 ;
567                 i_es_index < p_input->stream.p_selected_program->i_es_number;
568                 i_es_index ++ )
569         {
570 #define p_es p_input->stream.p_selected_program->pp_es[i_es_index]
571             if ( p_es->p_decoder_fifo )
572             {
573                 ioctl_UnsetDMXFilter(p_input, p_es->i_demux_fd );
574             }
575 #undef p_es
576         }
577     }
578
579     p_satellite = (input_socket_t *)p_input;
580     close( p_satellite->i_handle );
581 }
582
583 /*****************************************************************************
584  * SatelliteRead: reads data from the satellite card
585  *****************************************************************************/
586 static ssize_t SatelliteRead( input_thread_t * p_input, byte_t * p_buffer,
587                               size_t i_len )
588 {
589     input_socket_t * p_access_data = (input_socket_t *)p_input->p_access_data;
590     ssize_t i_ret;
591     unsigned int u_adapter = 1;
592     unsigned int u_device = 0;
593     unsigned int i;
594
595     // Get adapter and device number to use for this dvb card
596     u_adapter = config_GetInt( p_input, "adapter" );
597     u_device  = config_GetInt( p_input, "device" );
598
599     /* if not set, set filters to the PMTs */
600     for( i = 0; i < p_input->stream.i_pgrm_number; i++ )
601     {
602         if ( p_input->stream.pp_programs[i]->pp_es[0]->i_demux_fd == 0 )
603         {
604             ioctl_SetDMXFilter(p_input, p_input->stream.pp_programs[i]->pp_es[0]->i_id,
605                        &p_input->stream.pp_programs[i]->pp_es[0]->i_demux_fd,
606                        21, u_adapter, u_device );
607         }
608     }
609
610     i_ret = read( p_access_data->i_handle, p_buffer, i_len );
611  
612     if( i_ret < 0 )
613     {
614 #   ifdef HAVE_ERRNO_H
615         msg_Err( p_input, "read failed (%s)", strerror(errno) );
616 #   else
617         msg_Err( p_input, "read failed" );
618 #   endif
619     }
620
621     return i_ret;
622 }
623
624 /*****************************************************************************
625  * SatelliteSetArea : Does nothing
626  *****************************************************************************/
627 static int SatelliteSetArea( input_thread_t * p_input, input_area_t * p_area )
628 {
629     return -1;
630 }
631
632 /*****************************************************************************
633  * SatelliteSetProgram : Sets the card filters according to the
634  *                 selected program,
635  *                 and makes the appropriate changes to stream structure.
636  *****************************************************************************/
637 int SatelliteSetProgram( input_thread_t    * p_input,
638                          pgrm_descriptor_t * p_new_prg )
639 {
640     unsigned int i_es_index;
641     vlc_value_t val;
642     unsigned int u_adapter = 1;
643     unsigned int u_device = 0;
644     unsigned int u_video_type = 1; /* default video type */
645     unsigned int u_audio_type = 2; /* default audio type */
646
647     /* Get adapter and device number to use for this dvb card */
648     u_adapter = config_GetInt( p_input, "adapter" );
649     u_device  = config_GetInt( p_input, "device" );
650
651     if ( p_input->stream.p_selected_program )
652     {
653         for ( i_es_index = 1 ; /* 0 should be the PMT */
654                 i_es_index < p_input->stream.p_selected_program->i_es_number ;
655                 i_es_index ++ )
656         {
657 #define p_es p_input->stream.p_selected_program->pp_es[i_es_index]
658             if ( p_es->p_decoder_fifo )
659             {
660                 input_UnselectES( p_input , p_es );
661             }
662             if ( p_es->i_demux_fd > 0)
663             {
664                 ioctl_UnsetDMXFilter(p_input, p_es->i_demux_fd );
665                 p_es->i_demux_fd = 0;
666             }
667 #undef p_es
668         }
669     }
670
671     for (i_es_index = 1 ; i_es_index < p_new_prg->i_es_number ; i_es_index ++ )
672     {
673 #define p_es p_new_prg->pp_es[i_es_index]
674         switch( p_es->i_cat )
675         {
676             case MPEG1_VIDEO_ES:
677             case MPEG2_VIDEO_ES:
678             case MPEG2_MOTO_VIDEO_ES:
679                 if ( input_SelectES( p_input , p_es ) == 0 )
680                 {
681                     ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, u_video_type,
682                                        u_adapter, u_device);
683                     u_video_type += 5;
684                 }
685                 break;
686             case MPEG1_AUDIO_ES:
687             case MPEG2_AUDIO_ES:
688                 if ( input_SelectES( p_input , p_es ) == 0 )
689                 {
690                     ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, u_audio_type,
691                                        u_adapter, u_device);
692                     input_SelectES( p_input , p_es );
693                     u_audio_type += 5;
694                 }
695                 break;
696             default:
697                 ioctl_SetDMXFilter(p_input, p_es->i_id, &p_es->i_demux_fd, 21, u_adapter, u_device);
698                 input_SelectES( p_input , p_es );
699                 msg_Warn(p_input, "ES streamtype 0x%d found used as DMX_PES_OTHER !!",(int) p_es->i_cat);
700                 break;
701 #undef p_es
702         }
703     }
704
705     p_input->stream.p_selected_program = p_new_prg;
706
707     /* Update the navigation variables without triggering a callback */
708     val.i_int = p_new_prg->i_number;
709     var_Change( p_input, "program", VLC_VAR_SETVALUE, &val, NULL );
710
711     return 0;
712 }
713
714 /*****************************************************************************
715  * SatelliteSeek: does nothing (not a seekable stream
716  *****************************************************************************/
717 static void SatelliteSeek( input_thread_t * p_input, off_t i_off )
718 {
719     ;
720 }
721