]> git.sesse.net Git - vlc/blob - modules/demux/playlist/zpl.c
m3u: Fix 3 leaks.
[vlc] / modules / demux / playlist / zpl.c
1 /*****************************************************************************
2  * zpl.c : ZPL playlist format import
3  *****************************************************************************
4  * Copyright (C) 2009 the VideoLAN team
5  *
6  * Authors: Su Heaven <suheaven@gmail.com>
7  *          RĂ©mi Duraffort <ivoire@videolan.org>
8  *
9  * This program is free software; you can redistribute it and/or modify it
10  * under the terms of the GNU General Public License as published by the Free
11  * Software Foundation; either version 2 of the License, or (at your option)
12  * any later version.
13  *
14  * This program is distributed in the hope that it will be useful, but WITHOUT
15  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
16  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
17  * more details.
18  *
19  * You should have received a copy of the GNU General Public License along with
20  * this program; if not, write to the Free Software Foundation, Inc., 51
21  * Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27
28 #ifdef HAVE_CONFIG_H
29 # include "config.h"
30 #endif
31
32 #include <vlc_common.h>
33 #include <vlc_demux.h>
34 #include <vlc_charset.h>
35
36 #include "playlist.h"
37
38 struct demux_sys_t
39 {
40     char *psz_prefix;
41 };
42
43 /*****************************************************************************
44  * Local prototypes
45  *****************************************************************************/
46 static int Demux( demux_t *p_demux);
47 static int Control( demux_t *p_demux, int i_query, va_list args );
48 static char* ParseTabValue(char* psz_string);
49
50 /*****************************************************************************
51  * Import_ZPL: main import function
52  *****************************************************************************/
53 int Import_ZPL( vlc_object_t *p_this )
54 {
55     demux_t *p_demux = (demux_t *)p_this;
56
57     if(! ( demux_IsPathExtension( p_demux, ".zpl" ) || demux_IsForced( p_demux,  "zpl" )))
58         return VLC_EGENERIC;
59
60     STANDARD_DEMUX_INIT_MSG( "found valid ZPL playlist" );
61     p_demux->p_sys->psz_prefix = FindPrefix( p_demux );
62
63     return VLC_SUCCESS;
64 }
65
66
67 /*****************************************************************************
68  * Deactivate: frees unused data
69  *****************************************************************************/
70 void Close_ZPL( vlc_object_t *p_this )
71 {
72     demux_t *p_demux = (demux_t *)p_this;
73     free( p_demux->p_sys->psz_prefix );
74     free( p_demux->p_sys );
75 }
76
77 static int Demux( demux_t *p_demux )
78 {
79     char       *psz_line;
80
81     mtime_t i_duration = -1;
82     char *psz_title = NULL,       *psz_genre = NULL,      *psz_tracknum = NULL,
83          *psz_language = NULL,    *psz_artist = NULL,     *psz_album = NULL,
84          *psz_date = NULL,        *psz_publicher = NULL,  *psz_encodedby = NULL,
85          *psz_description = NULL, *psz_url = NULL,        *psz_copyright = NULL,
86          *psz_mrl = NULL;
87
88     input_item_t *p_current_input = GetCurrentItem(p_demux);
89
90     psz_line = stream_ReadLine( p_demux->s );
91     char *psz_parse = psz_line;
92
93     /* Skip leading tabs and spaces */
94     while( *psz_parse == ' '  || *psz_parse == '\t' ||
95            *psz_parse == '\n' || *psz_parse == '\r' )
96         psz_parse++;
97
98     /* if the 1st line is "AC", skip it */
99     /* TODO: using this information ? */
100     if( !strncasecmp( psz_parse, "AC", strlen( "AC" ) ) )
101     {
102         free( psz_line );
103         psz_line = stream_ReadLine( p_demux->s );
104     }
105
106     /* Loop on all lines */
107     while( psz_line )
108     {
109         psz_parse = psz_line;
110
111         /* Skip leading tabs and spaces */
112         while( *psz_parse == ' '  || *psz_parse == '\t' ||
113                *psz_parse == '\n' || *psz_parse == '\r' )
114             psz_parse++;
115
116         /* filename */
117         if( !strncasecmp( psz_parse, "NM", strlen( "NM" ) ) )
118         {
119             char *psz_tabvalue = ParseTabValue( psz_parse );
120             if( !EMPTY_STR(psz_tabvalue) )
121             {
122                 psz_mrl = ProcessMRL( psz_tabvalue, p_demux->p_sys->psz_prefix );
123             }
124             free( psz_tabvalue );
125         }
126
127         /* duration */
128         else if( !strncasecmp( psz_parse, "DR", strlen( "DR" ) ) )
129         {
130             char *psz_tabvalue = ParseTabValue( psz_parse );
131             if( !EMPTY_STR(psz_tabvalue) )
132             {
133                 int i_parsed_duration = atoi( psz_tabvalue );
134                 if( i_parsed_duration >= 0 )
135                     i_duration = i_parsed_duration * INT64_C(1000);
136             }
137             free( psz_tabvalue );
138         }
139
140 #define PARSE(tag,variable)                                     \
141     else if( !strncasecmp( psz_parse, tag, strlen( tag ) ) )    \
142         variable = ParseTabValue( psz_parse );
143
144         PARSE( "TT", psz_title )
145         PARSE( "TG", psz_genre )
146         PARSE( "TR", psz_tracknum )
147         PARSE( "TL", psz_language )
148         PARSE( "TA", psz_artist )
149         PARSE( "TB", psz_album )
150         PARSE( "TY", psz_date )
151         PARSE( "TH", psz_publicher )
152         PARSE( "TE", psz_encodedby )
153         PARSE( "TC", psz_description )
154         PARSE( "TU", psz_url )
155         PARSE( "TO", psz_copyright )
156
157 #undef PARSE
158
159         /* force a duration ? */
160         else if( !strncasecmp( psz_parse, "FD", strlen( "FD" ) ) )
161         {}
162
163         /* end of file entry */
164         else if( !strncasecmp( psz_parse, "BR!", strlen( "BR!" ) ) )
165         {
166             /* create the input item */
167             input_item_t *p_input = input_item_NewExt( p_demux, psz_mrl,
168                                         psz_title, 0, NULL, 0, i_duration );
169             input_item_AddSubItem( p_current_input, p_input );
170             FREENULL( psz_mrl );
171             FREENULL( psz_title );
172             i_duration = -1;
173
174 #define SET(variable, type)                             \
175     if( !EMPTY_STR(variable) )                          \
176     {                                                   \
177         input_item_Set##type( p_input, variable );      \
178         FREENULL( variable );                           \
179     }
180             /* set the meta */
181             SET( psz_genre, Genre );
182             SET( psz_tracknum, TrackNum );
183             SET( psz_language, Language );
184             SET( psz_artist, Artist );
185             SET( psz_album, Album );
186             SET( psz_date, Date );
187             SET( psz_encodedby, EncodedBy );
188             SET( psz_description, Description );
189             SET( psz_copyright, Copyright );
190 #undef SET
191
192         }
193         else
194             msg_Warn( p_demux, "invalid line '%s'", psz_parse );
195
196         /* Fetch another line */
197         free( psz_line );
198         psz_line = stream_ReadLine( p_demux->s );
199     }
200
201     vlc_gc_decref(p_current_input);
202     var_Destroy( p_demux, "zpl-extvlcopt" );
203     return 0; /* Needed for correct operation of go back */
204 }
205
206 static int Control( demux_t *p_demux, int i_query, va_list args )
207 {
208     VLC_UNUSED(p_demux); VLC_UNUSED(i_query); VLC_UNUSED(args);
209     return VLC_EGENERIC;
210 }
211
212 static char* ParseTabValue(char* psz_string)
213 {
214     int i_len = strlen( psz_string );
215     if(i_len <= 3 )
216         return NULL;
217     char* psz_value = calloc( i_len, 1 );
218     if( ! psz_value )
219         return NULL;
220
221     sscanf( psz_string,"%*[^=]=%[^\r\t\n]", psz_value );
222
223     return psz_value;
224 }
225
226