1 /*****************************************************************************
2 * pls.c : PLS playlist format import
3 *****************************************************************************
4 * Copyright (C) 2004 the VideoLAN team
7 * Authors: Clément Stenac <zorglub@videolan.org>
8 * Authors: Sigmund Augdal Helberg <dnumgis@videolan.org>
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23 *****************************************************************************/
25 /*****************************************************************************
27 *****************************************************************************/
32 #include <vlc_common.h>
33 #include <vlc_demux.h>
42 /*****************************************************************************
44 *****************************************************************************/
45 static int Demux( demux_t
*p_demux
);
46 static int Control( demux_t
*p_demux
, int i_query
, va_list args
);
48 /*****************************************************************************
49 * Import_PLS: main import function
50 *****************************************************************************/
51 int Import_PLS( vlc_object_t
*p_this
)
53 demux_t
*p_demux
= (demux_t
*)p_this
;
54 const uint8_t *p_peek
;
55 CHECK_PEEK( p_peek
, 10 );
57 if( POKE( p_peek
, "[playlist]", 10 ) || POKE( p_peek
, "[Reference]", 10 ) ||
58 demux_IsPathExtension( p_demux
, ".pls" ) || demux_IsForced( p_demux
, "pls" ) )
62 else return VLC_EGENERIC
;
64 STANDARD_DEMUX_INIT_MSG( "found valid PLS playlist file");
65 p_demux
->p_sys
->psz_prefix
= FindPrefix( p_demux
);
70 /*****************************************************************************
71 * Deactivate: frees unused data
72 *****************************************************************************/
73 void Close_PLS( vlc_object_t
*p_this
)
75 demux_t
*p_demux
= (demux_t
*)p_this
;
76 free( p_demux
->p_sys
->psz_prefix
);
77 free( p_demux
->p_sys
);
80 static int Demux( demux_t
*p_demux
)
82 mtime_t i_duration
= -1;
83 char *psz_name
= NULL
;
86 char *psz_mrl_orig
= NULL
;
92 input_item_t
*p_input
;
94 input_item_t
*p_current_input
= GetCurrentItem(p_demux
);
96 input_item_node_t
*p_subitems
= input_item_node_Create( p_current_input
);
98 while( ( psz_line
= stream_ReadLine( p_demux
->s
) ) )
100 if( !strncasecmp( psz_line
, "[playlist]", sizeof("[playlist]")-1 ) ||
101 !strncasecmp( psz_line
, "[Reference]", sizeof("[Reference]")-1 ) )
107 psz_value
= strchr( psz_line
, '=' );
115 msg_Warn( p_demux
, "invalid line in pls file" );
119 if( !strcasecmp( psz_key
, "version" ) )
121 msg_Dbg( p_demux
, "pls file version: %s", psz_value
);
125 if( !strcasecmp( psz_key
, "numberofentries" ) )
127 msg_Dbg( p_demux
, "pls should have %d entries", atoi(psz_value
) );
131 /* find the number part of of file1, title1 or length1 etc */
132 i_key_length
= strlen( psz_key
);
133 if( i_key_length
>= 4 ) /* Ref1 type case */
135 i_new_item
= atoi( psz_key
+ 3 );
136 if( i_new_item
== 0 && i_key_length
>= 5 ) /* file1 type case */
138 i_new_item
= atoi( psz_key
+ 4 );
139 if( i_new_item
== 0 && i_key_length
>= 6 ) /* title1 type case */
141 i_new_item
= atoi( psz_key
+ 5 );
142 if( i_new_item
== 0 && i_key_length
>= 7 ) /* length1 type case */
144 i_new_item
= atoi( psz_key
+ 6 );
149 if( i_new_item
== 0 )
151 msg_Warn( p_demux
, "couldn't find number of items" );
159 /* we found a new item, insert the previous */
160 if( i_item
!= i_new_item
)
164 p_input
= input_item_New( p_demux
, psz_mrl
, psz_name
);
165 input_item_CopyOptions( p_current_input
, p_input
);
166 input_item_AddSubItem( p_current_input
, p_input
);
167 input_item_node_AppendItem( p_subitems
, p_input
);
168 vlc_gc_decref( p_input
);
172 msg_Warn( p_demux
, "no file= part found for item %d", i_item
);
180 if( !strncasecmp( psz_key
, "file", sizeof("file") -1 ) ||
181 !strncasecmp( psz_key
, "Ref", sizeof("Ref") -1 ) )
183 free( psz_mrl_orig
);
185 psz_mrl
= ProcessMRL( psz_value
, p_demux
->p_sys
->psz_prefix
);
187 if( !strncasecmp( psz_key
, "Ref", sizeof("Ref") -1 ) )
189 if( !strncasecmp( psz_mrl
, "http://", sizeof("http://") -1 ) )
198 else if( !strncasecmp( psz_key
, "title", sizeof("title") -1 ) )
201 psz_name
= strdup( psz_value
);
203 else if( !strncasecmp( psz_key
, "length", sizeof("length") -1 ) )
205 i_duration
= atoi( psz_value
);
206 if( i_duration
!= -1 )
208 i_duration
*= 1000000;
213 msg_Warn( p_demux
, "unknown key found in pls file: %s", psz_key
);
217 /* Add last object */
220 p_input
= input_item_New( p_demux
, psz_mrl
, psz_name
);
221 input_item_CopyOptions( p_current_input
, p_input
);
222 input_item_AddSubItem( p_current_input
, p_input
);
223 input_item_node_AppendItem( p_subitems
, p_input
);
224 vlc_gc_decref( p_input
);
225 free( psz_mrl_orig
);
230 msg_Warn( p_demux
, "no file= part found for item %d", i_item
);
235 input_item_AddSubItemTree( p_subitems
);
236 input_item_node_Delete( p_subitems
);
238 vlc_gc_decref(p_current_input
);
239 return 0; /* Needed for correct operation of go back */
242 static int Control( demux_t
*p_demux
, int i_query
, va_list args
)
244 VLC_UNUSED(p_demux
); VLC_UNUSED(i_query
); VLC_UNUSED(args
);