modules/demux/playlist/b4s.c

   1 /*****************************************************************************
   2  * b4s.c : B4S playlist format import
   3  *****************************************************************************
   4  * Copyright (C) 2005-2009 VLC authors and VideoLAN
   5  * $Id$
   6  *
   7  * Authors: Sigmund Augdal Helberg <dnumgis@videolan.org>
   8  *
   9  * This program is free software; you can redistribute it and/or modify it
  10  * under the terms of the GNU Lesser General Public License as published by
  11  * the Free Software Foundation; either version 2.1 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 Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public License
  20  * along with this program; if not, write to the Free Software Foundation,
  21  * Inc., 51 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_access.h>
  34 #include <vlc_xml.h>
  35 #include <vlc_strings.h>
  36
  37 #include "playlist.h"
  38
  39 /*****************************************************************************
  40  * Local prototypes
  41  *****************************************************************************/
  42 static int ReadDir( stream_t *, input_item_node_t *);
  43 static bool IsWhitespace( const char *psz_string );
  44
  45 /*****************************************************************************
  46  * Import_B4S: main import function
  47  *****************************************************************************/
  48 int Import_B4S( vlc_object_t *p_this )
  49 {
  50     stream_t *demux = (stream_t *)p_this;
  51
  52     CHECK_FILE(demux);
  53     if( !stream_HasExtension( demux, ".b4s" ) )
  54         return VLC_EGENERIC;
  55
  56     demux->pf_readdir = ReadDir;
  57     demux->pf_control = access_vaDirectoryControlHelper;
  58
  59     return VLC_SUCCESS;
  60 }
  61
  62 static int ReadDir( stream_t *p_demux, input_item_node_t *p_subitems )
  63 {
  64     int i_ret = -1;
  65
  66     xml_reader_t *p_xml_reader = NULL;
  67     char *psz_elname = NULL;
  68     const char *node;
  69     input_item_t *p_input;
  70     char *psz_mrl = NULL, *psz_title = NULL, *psz_genre = NULL;
  71     char *psz_now = NULL, *psz_listeners = NULL, *psz_bitrate = NULL;
  72
  73     input_item_t *p_current_input = GetCurrentItem(p_demux);
  74
  75     free( vlc_stream_ReadLine( p_demux->s ) );
  76
  77     p_xml_reader = xml_ReaderCreate( p_demux, p_demux->s );
  78     if( !p_xml_reader )
  79         return -1;
  80
  81     /* xml */
  82     /* check root node */
  83     if( xml_ReaderNextNode( p_xml_reader, &node ) != XML_READER_STARTELEM )
  84     {
  85         msg_Err( p_demux, "invalid file (no root node)" );
  86         goto end;
  87     }
  88
  89     if( strcmp( node, "WinampXML" ) )
  90     {
  91         msg_Err( p_demux, "invalid root node: %s", node );
  92         goto end;
  93     }
  94
  95     /* root node should not have any attributes, and should only
  96      * contain the "playlist node */
  97
  98     /* Skip until 1st child node */
  99     while( (i_ret = xml_ReaderNextNode( p_xml_reader, &node )) != XML_READER_STARTELEM )
 100         if( i_ret <= 0 )
 101         {
 102             msg_Err( p_demux, "invalid file (no child node)" );
 103             goto end;
 104         }
 105
 106     if( strcmp( node, "playlist" ) )
 107     {
 108         msg_Err( p_demux, "invalid child node %s", node );
 109         goto end;
 110     }
 111
 112     // Read the attributes
 113     const char *attr, *value;
 114     while( (attr = xml_ReaderNextAttr( p_xml_reader, &value )) != NULL )
 115     {
 116         if( !strcmp( attr, "num_entries" ) )
 117             msg_Dbg( p_demux, "playlist has %d entries", atoi(value) );
 118         else if( !strcmp( attr, "label" ) )
 119             input_item_SetName( p_current_input, value );
 120         else
 121             msg_Warn( p_demux, "stray attribute %s with value %s in element"
 122                       " <playlist>", attr, value );
 123     }
 124
 125     while( (i_ret = xml_ReaderNextNode( p_xml_reader, &node )) > 0 )
 126     {
 127         // Get the node type
 128         switch( i_ret )
 129         {
 130             case XML_READER_STARTELEM:
 131             {
 132                 // Read the element name
 133                 free( psz_elname );
 134                 psz_elname = strdup( node );
 135                 if( unlikely(!psz_elname) )
 136                     goto end;
 137
 138                 // Read the attributes
 139                 while( (attr = xml_ReaderNextAttr( p_xml_reader, &value )) )
 140                 {
 141                     if( !strcmp( psz_elname, "entry" ) &&
 142                         !strcmp( attr, "Playstring" ) )
 143                     {
 144                         free( psz_mrl );
 145                         psz_mrl = strdup( value );
 146                     }
 147                     else
 148                     {
 149                         msg_Warn( p_demux, "unexpected attribute %s in <%s>",
 150                                   attr, psz_elname );
 151                     }
 152                 }
 153                 break;
 154             }
 155
 156             case XML_READER_TEXT:
 157             {
 158                 char **p;
 159
 160                 if( psz_elname == NULL )
 161                     break;
 162                 if( IsWhitespace( node ) )
 163                     break;
 164                 if( !strcmp( psz_elname, "Name" ) )
 165                     p = &psz_title;
 166                 else if( !strcmp( psz_elname, "Genre" ) )
 167                     p = &psz_genre;
 168                 else if( !strcmp( psz_elname, "Nowplaying" ) )
 169                     p = &psz_now;
 170                 else if( !strcmp( psz_elname, "Listeners" ) )
 171                     p = &psz_listeners;
 172                 else if( !strcmp( psz_elname, "Bitrate" ) )
 173                     p = &psz_bitrate;
 174                 else
 175                 {
 176                     msg_Warn( p_demux, "unexpected text in element <%s>",
 177                               psz_elname );
 178                     break;
 179                 }
 180                 free( *p );
 181                 *p = strdup( node );
 182                 break;
 183             }
 184
 185             // End element
 186             case XML_READER_ENDELEM:
 187             {
 188                 // Read the element name
 189                 if( !strcmp( node, "entry" ) )
 190                 {
 191                     vlc_xml_decode( psz_mrl );
 192                     p_input = input_item_New( psz_mrl, psz_title );
 193                     if( psz_now )
 194                         input_item_SetNowPlaying( p_input, psz_now );
 195                     if( psz_genre )
 196                         input_item_SetGenre( p_input, psz_genre );
 197                     if( psz_listeners )
 198                         msg_Err( p_demux, "Unsupported meta listeners" );
 199                     if( psz_bitrate )
 200                         msg_Err( p_demux, "Unsupported meta bitrate" );
 201
 202                     input_item_node_AppendItem( p_subitems, p_input );
 203                     input_item_Release( p_input );
 204                     FREENULL( psz_title );
 205                     FREENULL( psz_mrl );
 206                     FREENULL( psz_genre );
 207                     FREENULL( psz_bitrate );
 208                     FREENULL( psz_listeners );
 209                     FREENULL( psz_now );
 210                 }
 211                 FREENULL( psz_elname );
 212                 break;
 213             }
 214         }
 215     }
 216
 217     if( i_ret < 0 )
 218     {
 219         msg_Warn( p_demux, "error while parsing data" );
 220         i_ret = 0; /* Needed for correct operation of go back */
 221     }
 222
 223 end:
 224     free( psz_elname );
 225
 226     if( p_xml_reader )
 227         xml_ReaderDelete( p_xml_reader );
 228     return i_ret;
 229 }
 230
 231 static bool IsWhitespace( const char *psz_string )
 232 {
 233     psz_string += strspn( psz_string, " \t\r\n" );
 234     return !*psz_string;
 235 }