Fix duplicate definitions of FREE
[vlc.git] / modules / demux / playlist / dvb.c
1 /*****************************************************************************
2  * dvb.c : DVB channel list import (szap/tzap/czap compatible channel lists)
3  *****************************************************************************
4  * Copyright (C) 2005 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Gildas Bazin <gbazin@videolan.org>
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., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #include <vlc/vlc.h>
28 #include <vlc/input.h>
29 #include <vlc/intf.h>
30 #include "charset.h"
31
32 #include "playlist.h"
33
34 #ifndef LONG_MAX
35 #   define LONG_MAX 2147483647L
36 #   define LONG_MIN (-LONG_MAX-1)
37 #endif
38
39 /*****************************************************************************
40  * Local prototypes
41  *****************************************************************************/
42 static int Demux( demux_t *p_demux);
43 static int Control( demux_t *p_demux, int i_query, va_list args );
44
45 static int ParseLine( char *, char **, char ***, int *);
46
47 /*****************************************************************************
48  * Import_DVB: main import function
49  *****************************************************************************/
50 int E_(Import_DVB)( vlc_object_t *p_this )
51 {
52     demux_t *p_demux = (demux_t *)p_this;
53     uint8_t *p_peek;
54     int     i_peek;
55     vlc_bool_t b_valid = VLC_FALSE;
56
57     if( !isExtension( p_demux, ".conf" ) && !p_demux->b_force )
58         return VLC_EGENERIC;
59
60     /* Check if this really is a channels file */
61     if( (i_peek = stream_Peek( p_demux->s, &p_peek, 1024 )) > 0 )
62     {
63         char psz_line[1024+1];
64         int i;
65
66         for( i = 0; i < i_peek; i++ )
67         {
68             if( p_peek[i] == '\n' ) break;
69             psz_line[i] = p_peek[i];
70         }
71         psz_line[i] = 0;
72
73         if( ParseLine( psz_line, 0, 0, 0 ) ) b_valid = VLC_TRUE;
74     }
75
76     if( !b_valid ) return VLC_EGENERIC;
77
78     msg_Dbg( p_demux, "found valid DVB conf playlist file");
79     p_demux->pf_control = Control;
80     p_demux->pf_demux = Demux;
81
82     return VLC_SUCCESS;
83 }
84
85 /*****************************************************************************
86  * Deactivate: frees unused data
87  *****************************************************************************/
88 void E_(Close_DVB)( vlc_object_t *p_this )
89 {
90 }
91
92 /*****************************************************************************
93  * Demux: The important stuff
94  *****************************************************************************/
95 static int Demux( demux_t *p_demux )
96 {
97     char       *psz_line;
98     INIT_PLAYLIST_STUFF;
99
100     while( (psz_line = stream_ReadLine( p_demux->s )) )
101     {
102         playlist_item_t *p_item;
103         char **ppsz_options = NULL;
104         int  i, i_options = 0;
105         char *psz_name = NULL;
106
107         if( !ParseLine( psz_line, &psz_name, &ppsz_options, &i_options ) )
108         {
109             free( psz_line );
110             continue;
111         }
112
113         EnsureUTF8( psz_name );
114
115         p_input = input_ItemNewExt( p_playlist, "dvb:", psz_name, 0, NULL, -1 );
116         for( i = 0; i< i_options; i++ )
117         {
118             EnsureUTF8( ppsz_options[i] );
119             vlc_input_item_AddOption( p_input, ppsz_options[i] );
120         }
121         playlist_AddWhereverNeeded( p_playlist, p_input, p_current, 
122                                     p_item_in_category,
123                                     (i_parent_id > 0 ) ? VLC_TRUE: VLC_FALSE,
124                                     PLAYLIST_APPEND );
125
126         while( i_options-- ) free( ppsz_options[i_options] );
127         if( ppsz_options ) free( ppsz_options );
128
129         free( psz_line );
130     }
131
132     HANDLE_PLAY_AND_RELEASE;
133     return VLC_SUCCESS;
134 }
135
136 static struct
137 {
138     char *psz_name;
139     char *psz_option;
140
141 } dvb_options[] =
142 {
143     { "INVERSION_OFF", "dvb-inversion=0" },
144     { "INVERSION_ON", "dvb-inversion=1" },
145     { "INVERSION_AUTO", "dvb-inversion=2" },
146
147     { "BANDWIDTH_AUTO", "dvb-bandwidth=0" },
148     { "BANDWIDTH_6_MHZ", "dvb-bandwidth=6" },
149     { "BANDWIDTH_7_MHZ", "dvb-bandwidth=7" },
150     { "BANDWIDTH_8_MHZ", "dvb-bandwidth=8" },
151
152     { "FEC_NONE", "dvb-fec=0" },
153     { "FEC_1_2", "dvb-fec=1" },
154     { "FEC_2_3", "dvb-fec=2" },
155     { "FEC_3_4", "dvb-fec=3" },
156     { "FEC_4_5", "dvb-fec=4" },
157     { "FEC_5_6", "dvb-fec=5" },
158     { "FEC_6_7", "dvb-fec=6" },
159     { "FEC_7_8", "dvb-fec=7" },
160     { "FEC_8_9", "dvb-fec=8" },
161     { "FEC_AUTO", "dvb-fec=9" },
162
163     { "GUARD_INTERVAL_AUTO", "dvb-guard=0" },
164     { "GUARD_INTERVAL_1_4", "dvb-guard=4" },
165     { "GUARD_INTERVAL_1_8", "dvb-guard=8" },
166     { "GUARD_INTERVAL_1_16", "dvb-guard=16" },
167     { "GUARD_INTERVAL_1_32", "dvb-guard=32" },
168
169     { "HIERARCHY_NONE", "dvb-hierarchy=-1" },
170     { "HIERARCHY_1", "dvb-hierarchy=1" },
171     { "HIERARCHY_2", "dvb-hierarchy=2" },
172     { "HIERARCHY_4", "dvb-hierarchy=4" },
173
174     { "QPSK", "dvb-modulation=-1" },
175     { "QAM_AUTO", "dvb-modulation=0" },
176     { "QAM_16", "dvb-modulation=16" },
177     { "QAM_32", "dvb-modulation=32" },
178     { "QAM_64", "dvb-modulation=64" },
179     { "QAM_128", "dvb-modulation=128" },
180     { "QAM_256", "dvb-modulation=256" },
181
182     { "TRANSMISSION_MODE_AUTO", "dvb-transmission=0" },
183     { "TRANSMISSION_MODE_2K", "dvb-transmission=2" },
184     { "TRANSMISSION_MODE_8K", "dvb-transmission=8" },
185     { 0, 0 }
186
187 };
188
189 static int ParseLine( char *psz_line, char **ppsz_name,
190                       char ***pppsz_options, int *pi_options )
191 {
192     char *psz_name = 0, *psz_parse = psz_line;
193     int i_count = 0, i_program = 0, i_frequency = 0;
194     vlc_bool_t b_valid = VLC_FALSE;
195
196     if( pppsz_options ) *pppsz_options = 0;
197     if( pi_options ) *pi_options = 0;
198     if( ppsz_name ) *ppsz_name = 0;
199
200     /* Skip leading tabs and spaces */
201     while( *psz_parse == ' ' || *psz_parse == '\t' ||
202            *psz_parse == '\n' || *psz_parse == '\r' ) psz_parse++;
203
204     /* Ignore comments */
205     if( *psz_parse == '#' ) return VLC_FALSE;
206
207     while( psz_parse )
208     {
209         char *psz_option = 0;
210         char *psz_end = strchr( psz_parse, ':' );
211         if( psz_end ) { *psz_end = 0; psz_end++; }
212
213         if( i_count == 0 )
214         {
215             /* Channel name */
216             psz_name = psz_parse;
217         }
218         else if( i_count == 1 )
219         {
220             /* Frequency */
221             char *psz_end;
222             long i_value;
223
224             i_value = strtol( psz_parse, &psz_end, 10 );
225             if( psz_end == psz_parse ||
226                 i_value == LONG_MAX || i_value == LONG_MIN ) break;
227
228             i_frequency = i_value;
229         }
230         else
231         {
232             int i;
233
234             /* Check option name with our list */
235             for( i = 0; dvb_options[i].psz_name; i++ )
236             {
237                 if( !strcmp( psz_parse, dvb_options[i].psz_name ) )
238                 {
239                     psz_option = dvb_options[i].psz_option;
240
241                     /* If we recognize one of the strings, then we are sure
242                      * the data is really valid (ie. a channels file). */
243                     b_valid = VLC_TRUE;
244                     break;
245                 }
246             }
247
248             if( !psz_option )
249             {
250                 /* Option not recognized, test if it is a number */
251                 char *psz_end;
252                 long i_value;
253
254                 i_value = strtol( psz_parse, &psz_end, 10 );
255                 if( psz_end != psz_parse &&
256                     i_value != LONG_MAX && i_value != LONG_MIN )
257                 {
258                     i_program = i_value;
259                 }
260             }
261         }
262
263         if( psz_option && pppsz_options && pi_options )
264         {
265             psz_option = strdup( psz_option );
266             INSERT_ELEM( *pppsz_options, (*pi_options), (*pi_options),
267                          psz_option );
268         }
269
270         psz_parse = psz_end;
271         i_count++;
272     }
273
274     if( !b_valid && pppsz_options && pi_options )
275     {
276         /* This isn't a valid channels file, cleanup everything */
277         while( (*pi_options)-- ) free( (*pppsz_options)[*pi_options] );
278         if( *pppsz_options ) free( *pppsz_options );
279         *pppsz_options = 0; *pi_options = 0;
280     }
281
282     if( i_program && pppsz_options && pi_options )
283     {
284         char *psz_option;
285
286         asprintf( &psz_option, "program=%i", i_program );
287         INSERT_ELEM( *pppsz_options, (*pi_options), (*pi_options),
288                      psz_option );
289     }
290     if( i_frequency && pppsz_options && pi_options )
291     {
292         char *psz_option;
293
294         asprintf( &psz_option, "dvb-frequency=%i", i_frequency );
295         INSERT_ELEM( *pppsz_options, (*pi_options), (*pi_options),
296                      psz_option );
297     }
298     if( ppsz_name && psz_name ) *ppsz_name = strdup( psz_name );
299
300     return b_valid;
301 }
302
303 static int Control( demux_t *p_demux, int i_query, va_list args )
304 {
305     return VLC_EGENERIC;
306 }