1 /*****************************************************************************
2 * b4s.c : B4S playlist format import
3 *****************************************************************************
4 * Copyright (C) 2005 the VideoLAN team
7 * Authors: Sigmund Augdal Helberg <dnumgis@videolan.org>
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.
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.
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 *****************************************************************************/
24 /*****************************************************************************
26 *****************************************************************************/
27 #include <ctype.h> /* isspace() */
30 #include <vlc_demux.h>
31 #include <vlc_interface.h>
40 xml_reader_t *p_xml_reader;
43 /*****************************************************************************
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 *GetNextToken(char *psz_cur_string);
49 static int IsWhitespace( char *psz_string );
51 /*****************************************************************************
52 * Import_B4S: main import function
53 *****************************************************************************/
54 int E_(Import_B4S)( vlc_object_t *p_this )
56 DEMUX_BY_EXTENSION_OR_FORCED_MSG( ".b4s", "b4s-open",
57 "using B4S playlist reader" );
58 p_demux->p_sys->psz_prefix = E_(FindPrefix)( p_demux );
59 p_demux->p_sys->p_xml = NULL;
60 p_demux->p_sys->p_xml_reader = NULL;
64 /*****************************************************************************
65 * Deactivate: frees unused data
66 *****************************************************************************/
67 void E_(Close_B4S)( vlc_object_t *p_this )
69 demux_t *p_demux = (demux_t *)p_this;
70 demux_sys_t *p_sys = p_demux->p_sys;
72 if( p_sys->psz_prefix ) free( p_sys->psz_prefix );
73 if( p_sys->p_xml_reader ) xml_ReaderDelete( p_sys->p_xml, p_sys->p_xml_reader );
74 if( p_sys->p_xml ) xml_Delete( p_sys->p_xml );
78 static int Demux( demux_t *p_demux )
80 demux_sys_t *p_sys = p_demux->p_sys;
84 xml_reader_t *p_xml_reader;
85 char *psz_elname = NULL;
87 input_item_t *p_input;
88 char *psz_mrl = NULL, *psz_name = NULL, *psz_genre = NULL;
89 char *psz_now = NULL, *psz_listeners = NULL, *psz_bitrate = NULL;
93 p_xml = p_sys->p_xml = xml_Create( p_demux );
94 if( !p_xml ) return -1;
96 psz_elname = stream_ReadLine( p_demux->s );
97 if( psz_elname ) free( psz_elname );
100 p_xml_reader = xml_ReaderCreate( p_xml, p_demux->s );
101 if( !p_xml_reader ) return -1;
102 p_sys->p_xml_reader = p_xml_reader;
105 /* check root node */
106 if( xml_ReaderRead( p_xml_reader ) != 1 )
108 msg_Err( p_demux, "invalid file (no root node)" );
109 vlc_object_release( p_playlist );
113 if( xml_ReaderNodeType( p_xml_reader ) != XML_READER_STARTELEM ||
114 ( psz_elname = xml_ReaderName( p_xml_reader ) ) == NULL ||
115 strcmp( psz_elname, "WinampXML" ) )
117 msg_Err( p_demux, "invalid root node %i, %s",
118 xml_ReaderNodeType( p_xml_reader ), psz_elname );
119 if( psz_elname ) free( psz_elname );
120 vlc_object_release( p_playlist );
125 /* root node should not have any attributes, and should only
126 * contain the "playlist node */
128 /* Skip until 1st child node */
129 while( (i_ret = xml_ReaderRead( p_xml_reader )) == 1 &&
130 xml_ReaderNodeType( p_xml_reader ) != XML_READER_STARTELEM );
133 msg_Err( p_demux, "invalid file (no child node)" );
137 if( ( psz_elname = xml_ReaderName( p_xml_reader ) ) == NULL ||
138 strcmp( psz_elname, "playlist" ) )
140 msg_Err( p_demux, "invalid child node %s", psz_elname );
141 if( psz_elname ) free( psz_elname );
144 free( psz_elname ); psz_elname = 0;
146 // Read the attributes
147 while( xml_ReaderNextAttr( p_xml_reader ) == VLC_SUCCESS )
149 char *psz_name = xml_ReaderName( p_xml_reader );
150 char *psz_value = xml_ReaderValue( p_xml_reader );
151 if( !psz_name || !psz_value ) return -1;
152 if( !strcmp( psz_name, "num_entries" ) )
154 msg_Dbg( p_demux, "playlist has %d entries", atoi(psz_value) );
156 else if( !strcmp( psz_name, "label" ) )
158 input_item_SetName( p_current_input, psz_value );
162 msg_Warn( p_demux, "stray attribute %s with value %s in element"
163 " 'playlist'", psz_name, psz_value );
169 while( (i_ret = xml_ReaderRead( p_xml_reader )) == 1 )
172 i_type = xml_ReaderNodeType( p_xml_reader );
180 case XML_READER_STARTELEM:
182 // Read the element name
183 if( psz_elname ) free( psz_elname );
184 psz_elname = xml_ReaderName( p_xml_reader );
185 if( !psz_elname ) return -1;
188 // Read the attributes
189 while( xml_ReaderNextAttr( p_xml_reader ) == VLC_SUCCESS )
191 char *psz_name = xml_ReaderName( p_xml_reader );
192 char *psz_value = xml_ReaderValue( p_xml_reader );
193 if( !psz_name || !psz_value ) return -1;
194 if( !strcmp( psz_elname, "entry" ) &&
195 !strcmp( psz_name, "Playstring" ) )
197 psz_mrl = strdup( psz_value );
201 msg_Warn( p_demux, "unexpected attribure %s in element %s",
202 psz_name, psz_elname );
209 case XML_READER_TEXT:
211 char *psz_text = xml_ReaderValue( p_xml_reader );
212 if( IsWhitespace( psz_text ) )
217 if( !strcmp( psz_elname, "Name" ) )
219 psz_name = strdup( psz_text );
221 else if( !strcmp( psz_elname, "Genre" ) )
223 psz_genre = strdup( psz_text );
225 else if( !strcmp( psz_elname, "Nowplaying" ) )
227 psz_now = strdup( psz_text );
229 else if( !strcmp( psz_elname, "Listeners" ) )
231 psz_listeners = strdup( psz_text );
233 else if( !strcmp( psz_elname, "Bitrate" ) )
235 psz_bitrate = strdup( psz_text );
237 else if( !strcmp( psz_elname, "" ) )
243 msg_Warn( p_demux, "unexpected text in element '%s'",
250 case XML_READER_ENDELEM:
252 // Read the element name
254 psz_elname = xml_ReaderName( p_xml_reader );
255 if( !psz_elname ) return -1;
256 if( !strcmp( psz_elname, "entry" ) )
258 p_input = input_ItemNewExt( p_playlist, psz_mrl, psz_name,
261 input_item_SetNowPlaying( p_input, psz_now );
263 input_item_SetGenre( p_input, psz_genre );
265 msg_Err( p_playlist, "Unsupported meta listeners" );
267 msg_Err( p_playlist, "Unsupported meta bitrate" );
269 input_ItemAddSubItem( p_current_input, p_input );
270 FREENULL( psz_name );
272 FREENULL( psz_genre );
273 FREENULL( psz_bitrate );
274 FREENULL( psz_listeners );
278 psz_elname = strdup("");
287 msg_Warn( p_demux, "error while parsing data" );
290 HANDLE_PLAY_AND_RELEASE;
291 return -1; /* Needed for correct operation of go back */
294 static int Control( demux_t *p_demux, int i_query, va_list args )
301 * Get a in-string pointer to the start of the next token from a
302 * string terminating the pointer returned by a previous call.
304 * \param psz_cur_string The string to search for the token from
305 * \return a pointer to withing psz_cur_string, or NULL if no token
307 * \note The returned pointer may contain more than one
308 * token, Run GetNextToken once more to terminate the token properly
310 static char *GetNextToken(char *psz_cur_string) {
311 while (*psz_cur_string && !isspace(*psz_cur_string))
313 if (!*psz_cur_string)
315 *psz_cur_string++ = '\0';
316 while (*psz_cur_string && isspace(*psz_cur_string))
318 return psz_cur_string;
322 static int IsWhitespace( char *psz_string )
326 if( *psz_string != ' ' && *psz_string != '\t' && *psz_string != '\r' &&
327 *psz_string != '\n' )