]> git.sesse.net Git - vlc/blob - src/playlist/playlist.c
eb901a1c425ad2218c955344caf357a073bf49bd
[vlc] / src / playlist / playlist.c
1 /*****************************************************************************
2  * playlist.c : Playlist management functions
3  *****************************************************************************
4  * Copyright (C) 1999-2004 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Samuel Hocevar <sam@zoy.org>
8  *          ClĂ©ment Stenac <zorglub@videolan.org>
9  *
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.
14  *
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.
19  *
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., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
23  *****************************************************************************/
24 #include <stdlib.h>                                      /* free(), strtol() */
25 #include <stdio.h>                                              /* sprintf() */
26 #include <string.h>                                            /* strerror() */
27
28 #include <vlc/vlc.h>
29 #include <vlc/vout.h>
30 #include <vlc/sout.h>
31 #include <vlc/input.h>
32
33 #include "vlc_playlist.h"
34
35 #include "vlc_interaction.h"
36
37 #define TITLE_CATEGORY N_( "By category" )
38 #define TITLE_SIMPLE   N_( "Manually added" )
39 #define TITLE_ALL      N_( "All items, unsorted" )
40
41 #undef PLAYLIST_PROFILE
42 #undef PLAYLIST_DEBUG
43
44 /*****************************************************************************
45  * Local prototypes
46  *****************************************************************************/
47 static void RunThread ( playlist_t * );
48 static void RunPreparse( playlist_preparse_t * );
49 static playlist_item_t * NextItem  ( playlist_t * );
50 static int PlayItem  ( playlist_t *, playlist_item_t * );
51
52 int playlist_vaControl( playlist_t * p_playlist, int i_query, va_list args );
53
54 void playlist_PreparseEnqueueItemSub( playlist_t *, playlist_item_t * );
55
56 playlist_item_t *playlist_RecursiveFindLast(playlist_t *p_playlist,
57                                             playlist_item_t *p_node );
58
59 /*****************************************************************************
60  * Helper Function for NextItem
61  *****************************************************************************/
62
63 playlist_item_t *playlist_RecursiveFindLast(playlist_t *p_playlist,
64                                             playlist_item_t *p_node )
65 {
66     int i;
67     playlist_item_t *p_item;
68     for ( i = p_node->i_children - 1; i >= 0; i-- )
69     {
70         if( p_node->pp_children[i]->i_children == -1 )
71             return p_node->pp_children[i];
72         else if(p_node->pp_children[i]->i_children > 0)
73         {
74              p_item = playlist_RecursiveFindLast( p_playlist,
75                                         p_node->pp_children[i] );
76             if ( p_item != NULL )
77                 return p_item;
78         }
79         else if( i == 0 )
80             return NULL;
81     }
82     return NULL;
83 }
84
85
86 /**
87  * Create playlist
88  *
89  * Create a playlist structure.
90  * \param p_parent the vlc object that is to be the parent of this playlist
91  * \return a pointer to the created playlist, or NULL on error
92  */
93 playlist_t * __playlist_Create ( vlc_object_t *p_parent )
94 {
95     playlist_t *p_playlist;
96     playlist_view_t *p_view;
97     vlc_value_t     val;
98
99     /* Allocate structure */
100     p_playlist = vlc_object_create( p_parent, VLC_OBJECT_PLAYLIST );
101     if( !p_playlist )
102     {
103         msg_Err( p_parent, "out of memory" );
104         return NULL;
105     }
106
107     /* These variables control updates */
108     var_Create( p_playlist, "intf-change", VLC_VAR_BOOL );
109     val.b_bool = VLC_TRUE;
110     var_Set( p_playlist, "intf-change", val );
111
112     var_Create( p_playlist, "item-change", VLC_VAR_INTEGER );
113     val.i_int = -1;
114     var_Set( p_playlist, "item-change", val );
115
116     var_Create( p_playlist, "item-deleted", VLC_VAR_INTEGER );
117     val.i_int = -1;
118     var_Set( p_playlist, "item-deleted", val );
119
120     var_Create( p_playlist, "item-append", VLC_VAR_ADDRESS );
121
122     var_Create( p_playlist, "playlist-current", VLC_VAR_INTEGER );
123     val.i_int = -1;
124     var_Set( p_playlist, "playlist-current", val );
125
126     var_Create( p_playlist, "intf-popupmenu", VLC_VAR_BOOL );
127
128     var_Create( p_playlist, "intf-show", VLC_VAR_BOOL );
129     val.b_bool = VLC_TRUE;
130     var_Set( p_playlist, "intf-show", val );
131
132
133     /* Variables to control playback */
134     var_CreateGetBool( p_playlist, "play-and-stop" );
135     var_CreateGetBool( p_playlist, "random" );
136     var_CreateGetBool( p_playlist, "repeat" );
137     var_CreateGetBool( p_playlist, "loop" );
138
139     /* Initialise data structures */
140     vlc_mutex_init( p_playlist, &p_playlist->gc_lock );
141     p_playlist->i_last_id = 0;
142     p_playlist->b_go_next = VLC_TRUE;
143     p_playlist->p_input = NULL;
144
145     p_playlist->request_date = 0;
146
147     p_playlist->i_views = 0;
148     p_playlist->pp_views = NULL;
149
150     p_playlist->i_index = -1;
151     p_playlist->i_size = 0;
152     p_playlist->pp_items = NULL;
153     p_playlist->i_all_size = 0;
154     p_playlist->pp_all_items = 0;
155
156     playlist_ViewInsert( p_playlist, VIEW_CATEGORY, TITLE_CATEGORY );
157     playlist_ViewInsert( p_playlist, VIEW_ALL, TITLE_ALL );
158
159     p_view = playlist_ViewFind( p_playlist, VIEW_CATEGORY );
160
161     p_playlist->p_general =
162         playlist_NodeCreate( p_playlist, VIEW_CATEGORY,
163                              _( "General" ), p_view->p_root );
164     p_playlist->p_general->i_flags |= PLAYLIST_RO_FLAG;
165
166     /* Set startup status
167      * We set to simple view on startup for interfaces that don't do
168      * anything */
169     p_view = playlist_ViewFind( p_playlist, VIEW_CATEGORY );
170     p_playlist->status.i_view = VIEW_CATEGORY;
171     p_playlist->status.p_item = NULL;
172     p_playlist->status.p_node = p_view->p_root;
173     p_playlist->request.b_request = VLC_FALSE;
174     p_playlist->status.i_status = PLAYLIST_STOPPED;
175
176
177     p_playlist->i_sort = SORT_ID;
178     p_playlist->i_order = ORDER_NORMAL;
179
180     /* Finally, launch the thread ! */
181     if( vlc_thread_create( p_playlist, "playlist", RunThread,
182                            VLC_THREAD_PRIORITY_LOW, VLC_TRUE ) )
183     {
184         msg_Err( p_playlist, "cannot spawn playlist thread" );
185         vlc_object_destroy( p_playlist );
186         return NULL;
187     }
188
189     /* Preparsing stuff */
190     p_playlist->p_preparse = vlc_object_create( p_playlist,
191                                                 sizeof( playlist_preparse_t ) );
192     if( !p_playlist->p_preparse )
193     {
194         msg_Err( p_playlist, "unable to create preparser" );
195         vlc_object_destroy( p_playlist );
196         return NULL;
197     }
198
199     // Preparse
200     p_playlist->p_preparse->i_waiting = 0;
201     p_playlist->p_preparse->pp_waiting = NULL;
202
203     // Interaction
204     p_playlist->p_interaction = NULL;
205
206     vlc_object_attach( p_playlist->p_preparse, p_playlist );
207     if( vlc_thread_create( p_playlist->p_preparse, "preparser",
208                            RunPreparse, VLC_THREAD_PRIORITY_LOW, VLC_TRUE ) )
209     {
210         msg_Err( p_playlist, "cannot spawn preparse thread" );
211         vlc_object_detach( p_playlist->p_preparse );
212         vlc_object_destroy( p_playlist->p_preparse );
213         return NULL;
214     }
215
216     /* The object has been initialized, now attach it */
217     vlc_object_attach( p_playlist, p_parent );
218
219     return p_playlist;
220 }
221
222 /**
223  * Destroy the playlist.
224  *
225  * Delete all items in the playlist and free the playlist structure.
226  * \param p_playlist the playlist structure to destroy
227  * \return VLC_SUCCESS or an error
228  */
229 int playlist_Destroy( playlist_t * p_playlist )
230 {
231     int i;
232     p_playlist->b_die = 1;
233
234     while( p_playlist->i_sds )
235     {
236         playlist_ServicesDiscoveryRemove( p_playlist,
237                                           p_playlist->pp_sds[0]->psz_module );
238     }
239
240     if( p_playlist->p_interaction )
241     {
242         intf_InteractionDestroy( p_playlist->p_interaction );
243     }
244
245     vlc_thread_join( p_playlist->p_preparse );
246     vlc_thread_join( p_playlist );
247
248     vlc_object_detach( p_playlist->p_preparse );
249
250     var_Destroy( p_playlist, "intf-change" );
251     var_Destroy( p_playlist, "item-change" );
252     var_Destroy( p_playlist, "playlist-current" );
253     var_Destroy( p_playlist, "intf-popmenu" );
254     var_Destroy( p_playlist, "intf-show" );
255     var_Destroy( p_playlist, "play-and-stop" );
256     var_Destroy( p_playlist, "random" );
257     var_Destroy( p_playlist, "repeat" );
258     var_Destroy( p_playlist, "loop" );
259
260     playlist_Clear( p_playlist );
261
262     for( i = p_playlist->i_views - 1; i >= 0 ; i-- )
263     {
264         playlist_view_t *p_view = p_playlist->pp_views[i];
265         if( p_view->psz_name )
266             free( p_view->psz_name );
267         playlist_ItemDelete( p_view->p_root );
268         REMOVE_ELEM( p_playlist->pp_views, p_playlist->i_views, i );
269         free( p_view );
270     }
271
272     vlc_mutex_destroy( &p_playlist->gc_lock );
273     vlc_object_destroy( p_playlist->p_preparse );
274     vlc_object_destroy( p_playlist );
275
276     return VLC_SUCCESS;
277 }
278
279
280 /**
281  * Do a playlist action.
282  *
283  * If there is something in the playlist then you can do playlist actions.
284  *
285  * Playlist lock must not be taken when calling this function
286  *
287  * \param p_playlist the playlist to do the command on
288  * \param i_query the command to do
289  * \param variable number of arguments
290  * \return VLC_SUCCESS or an error
291  */
292 int playlist_LockControl( playlist_t * p_playlist, int i_query, ... )
293 {
294     va_list args;
295     int i_result;
296     va_start( args, i_query );
297     vlc_mutex_lock( &p_playlist->object_lock );
298     i_result = playlist_vaControl( p_playlist, i_query, args );
299     va_end( args );
300     vlc_mutex_unlock( &p_playlist->object_lock );
301     return i_result;
302 }
303
304 /**
305  * Do a playlist action.
306  *
307  * If there is something in the playlist then you can do playlist actions.
308  *
309  * Playlist lock must be taken when calling this function
310  *
311  * \param p_playlist the playlist to do the command on
312  * \param i_query the command to do
313  * \param variable number of arguments
314  * \return VLC_SUCCESS or an error
315  */
316 int playlist_Control( playlist_t * p_playlist, int i_query, ... )
317 {
318     va_list args;
319     int i_result;
320     va_start( args, i_query );
321     i_result = playlist_vaControl( p_playlist, i_query, args );
322     va_end( args );
323
324     return i_result;
325 }
326
327 int playlist_vaControl( playlist_t * p_playlist, int i_query, va_list args )
328 {
329     playlist_view_t *p_view;
330     playlist_item_t *p_item, *p_node;
331     int i_view;
332     vlc_value_t val;
333
334 #ifdef PLAYLIST_PROFILE
335     p_playlist->request_date = mdate();
336 #endif
337
338     if( p_playlist->i_size <= 0 )
339     {
340         return VLC_EGENERIC;
341     }
342
343     switch( i_query )
344     {
345     case PLAYLIST_STOP:
346         p_playlist->status.i_status = PLAYLIST_STOPPED;
347         p_playlist->request.b_request = VLC_TRUE;
348         p_playlist->request.p_item = NULL;
349         break;
350
351     case PLAYLIST_ITEMPLAY:
352         p_item = (playlist_item_t *)va_arg( args, playlist_item_t * );
353         if ( p_item == NULL || p_item->input.psz_uri == NULL )
354             return VLC_EGENERIC;
355         p_playlist->status.i_status = PLAYLIST_RUNNING;
356         p_playlist->request.i_skip = 0;
357         p_playlist->request.b_request = VLC_TRUE;
358         p_playlist->request.p_item = p_item;
359         p_playlist->request.i_view = p_playlist->status.i_view;
360         p_view = playlist_ViewFind( p_playlist, p_playlist->status.i_view );
361         if( p_view )
362         {
363             p_playlist->request.p_node = p_view->p_root;
364         }
365         else
366         {
367             p_playlist->request.p_node = NULL;
368         }
369         break;
370
371     case PLAYLIST_VIEWPLAY:
372         i_view = (int)va_arg( args,int );
373         p_node = (playlist_item_t *)va_arg( args, playlist_item_t * );
374         p_item = (playlist_item_t *)va_arg( args, playlist_item_t * );
375         if ( p_node == NULL ) //|| (p_item != NULL && p_item->input.psz_uri
376                                 //                         == NULL ))
377         {
378             p_playlist->status.i_status = PLAYLIST_STOPPED;
379             p_playlist->request.b_request = VLC_TRUE;
380             return VLC_SUCCESS;
381         }
382         p_playlist->status.i_status = PLAYLIST_RUNNING;
383         p_playlist->request.i_skip = 0;
384         p_playlist->request.b_request = VLC_TRUE;
385         p_playlist->request.i_view = i_view;
386         p_playlist->request.p_node = p_node;
387         p_playlist->request.p_item = p_item;
388
389         /* Don't go further if the node doesn't want to */
390         if( ! p_playlist->request.p_node->i_flags & PLAYLIST_SKIP_FLAG )
391         {
392             p_playlist->b_go_next = VLC_FALSE;
393         }
394         else
395         {
396             p_playlist->b_go_next = VLC_TRUE;
397         }
398         break;
399
400     case PLAYLIST_PLAY:
401         p_playlist->status.i_status = PLAYLIST_RUNNING;
402
403         if( p_playlist->p_input )
404         {
405             val.i_int = PLAYING_S;
406             var_Set( p_playlist->p_input, "state", val );
407             break;
408         }
409
410         /* FIXME : needed ? */
411         p_playlist->request.b_request = VLC_TRUE;
412         p_playlist->request.i_view = p_playlist->status.i_view;
413         p_playlist->request.p_node = p_playlist->status.p_node;
414         p_playlist->request.p_item = p_playlist->status.p_item;
415         p_playlist->request.i_skip = 0;
416         p_playlist->request.i_goto = -1;
417         break;
418
419     case PLAYLIST_AUTOPLAY:
420         p_playlist->status.i_status = PLAYLIST_RUNNING;
421         p_playlist->status.p_node = p_playlist->p_general;
422
423         p_playlist->request.b_request = VLC_FALSE;
424         break;
425
426     case PLAYLIST_PAUSE:
427         val.i_int = 0;
428         if( p_playlist->p_input )
429             var_Get( p_playlist->p_input, "state", &val );
430
431         if( val.i_int == PAUSE_S )
432         {
433             p_playlist->status.i_status = PLAYLIST_RUNNING;
434             if( p_playlist->p_input )
435             {
436                 val.i_int = PLAYING_S;
437                 var_Set( p_playlist->p_input, "state", val );
438             }
439         }
440         else
441         {
442             p_playlist->status.i_status = PLAYLIST_PAUSED;
443             if( p_playlist->p_input )
444             {
445                 val.i_int = PAUSE_S;
446                 var_Set( p_playlist->p_input, "state", val );
447             }
448         }
449         break;
450
451     case PLAYLIST_SKIP:
452         p_playlist->request.i_view = p_playlist->status.i_view;
453         if( p_playlist->status.i_view > -1 )
454         {
455             p_playlist->request.p_node = p_playlist->status.p_node;
456             p_playlist->request.p_item = p_playlist->status.p_item;
457         }
458         else
459         {
460             p_playlist->request.p_node = NULL;
461             p_playlist->request.p_item = NULL;
462         }
463         p_playlist->request.i_skip = (int) va_arg( args, int );
464         p_playlist->request.b_request = VLC_TRUE;
465         break;
466
467     case PLAYLIST_GOTO:
468         p_playlist->status.i_status = PLAYLIST_RUNNING;
469         p_playlist->request.p_node = NULL;
470         p_playlist->request.p_item = NULL;
471         p_playlist->request.i_view = -1;
472         p_playlist->request.i_goto = (int) va_arg( args, int );
473         p_playlist->request.b_request = VLC_TRUE;
474         break;
475
476     default:
477         msg_Err( p_playlist, "unknown playlist query" );
478         return VLC_EBADVAR;
479         break;
480     }
481
482     return VLC_SUCCESS;
483 }
484
485 int playlist_PreparseEnqueue( playlist_t *p_playlist,
486                               input_item_t *p_item )
487 {
488     vlc_mutex_lock( &p_playlist->p_preparse->object_lock );
489     INSERT_ELEM( p_playlist->p_preparse->pp_waiting,
490                  p_playlist->p_preparse->i_waiting,
491                  p_playlist->p_preparse->i_waiting,
492                  p_item );
493     vlc_mutex_unlock( &p_playlist->p_preparse->object_lock );
494     return VLC_SUCCESS;
495 }
496
497 /* Should only be called if playlist and preparser are locked */
498 void playlist_PreparseEnqueueItemSub( playlist_t *p_playlist,
499                                      playlist_item_t *p_item )
500 {
501     int i;
502     if( p_item->i_children == -1 )
503     {
504         INSERT_ELEM( p_playlist->p_preparse->pp_waiting,
505                      p_playlist->p_preparse->i_waiting,
506                      p_playlist->p_preparse->i_waiting,
507                      &(p_item->input) );
508     }
509     else
510     {
511         for( i = 0; i < p_item->i_children; i++)
512         {
513             playlist_PreparseEnqueueItemSub( p_playlist,
514                                              p_item->pp_children[i] );
515         }
516     }
517 }
518
519 int playlist_PreparseEnqueueItem( playlist_t *p_playlist,
520                                   playlist_item_t *p_item )
521 {
522     vlc_mutex_lock( &p_playlist->object_lock );
523     vlc_mutex_lock( &p_playlist->p_preparse->object_lock );
524     playlist_PreparseEnqueueItemSub( p_playlist, p_item );
525     vlc_mutex_unlock( &p_playlist->p_preparse->object_lock );
526     vlc_mutex_unlock( &p_playlist->object_lock );
527     return VLC_SUCCESS;
528 }
529
530
531 /* Destroy remaining objects */
532 static mtime_t ObjectGarbageCollector( playlist_t *p_playlist, int i_type,
533                                        mtime_t destroy_date )
534 {
535     vlc_object_t *p_obj;
536
537     if( destroy_date > mdate() ) return destroy_date;
538
539     if( destroy_date == 0 )
540     {
541         /* give a little time */
542         return mdate() + I64C(1000000);
543     }
544     else
545     {
546         vlc_mutex_lock( &p_playlist->gc_lock );
547         while( ( p_obj = vlc_object_find( p_playlist, i_type, FIND_CHILD ) ) )
548         {
549             if( p_obj->p_parent != (vlc_object_t*)p_playlist )
550             {
551                 /* only first child (ie unused) */
552                 vlc_object_release( p_obj );
553                 break;
554             }
555             if( i_type == VLC_OBJECT_VOUT )
556             {
557                 msg_Dbg( p_playlist, "garbage collector destroying 1 vout" );
558                 vlc_object_detach( p_obj );
559                 vlc_object_release( p_obj );
560                 vout_Destroy( (vout_thread_t *)p_obj );
561             }
562             else if( i_type == VLC_OBJECT_SOUT )
563             {
564                 vlc_object_release( p_obj );
565                 sout_DeleteInstance( (sout_instance_t*)p_obj );
566             }
567         }
568         vlc_mutex_unlock( &p_playlist->gc_lock );
569         return 0;
570     }
571 }
572
573 /*****************************************************************************
574  * RunThread: main playlist thread
575  *****************************************************************************/
576 static void RunThread ( playlist_t *p_playlist )
577 {
578     vlc_object_t *p_obj;
579     playlist_item_t *p_item = NULL;
580
581     mtime_t    i_vout_destroyed_date = 0;
582     mtime_t    i_sout_destroyed_date = 0;
583
584     playlist_item_t *p_autodelete_item = NULL;
585
586     /* Tell above that we're ready */
587     vlc_thread_ready( p_playlist );
588
589     while( !p_playlist->b_die )
590     {
591         if( p_playlist->p_interaction )
592         {
593             intf_InteractionManage( p_playlist );
594         }
595
596         vlc_mutex_lock( &p_playlist->object_lock );
597
598         /* First, check if we have something to do */
599         /* FIXME : this can be called several times */
600         if( p_playlist->request.b_request )
601         {
602 #ifdef PLAYLIST_PROFILE
603             msg_Dbg(p_playlist, "beginning processing of request, "
604                          I64Fi" us ", mdate() - p_playlist->request_date );
605 #endif
606             /* Stop the existing input */
607             if( p_playlist->p_input )
608             {
609                 input_StopThread( p_playlist->p_input );
610             }
611             /* The code below will start the next input for us */
612             if( p_playlist->status.i_status == PLAYLIST_STOPPED )
613             {
614                 p_playlist->request.b_request = VLC_FALSE;
615             }
616         }
617
618         /* If there is an input, check that it doesn't need to die. */
619         if( p_playlist->p_input )
620         {
621             /* This input is dead. Remove it ! */
622             if( p_playlist->p_input->b_dead )
623             {
624                 input_thread_t *p_input;
625
626                 p_input = p_playlist->p_input;
627                 p_playlist->p_input = NULL;
628
629                 /* Release the playlist lock, because we may get stuck
630                  * in input_DestroyThread() for some time. */
631                 vlc_mutex_unlock( &p_playlist->object_lock );
632
633                 /* Destroy input */
634                 input_DestroyThread( p_input );
635
636                 /* Unlink current input
637                  * (_after_ input_DestroyThread for vout garbage collector) */
638                 vlc_object_detach( p_input );
639
640                 /* Destroy object */
641                 vlc_object_destroy( p_input );
642
643                 i_vout_destroyed_date = 0;
644                 i_sout_destroyed_date = 0;
645
646                 if( p_playlist->status.p_item->i_flags
647                     & PLAYLIST_REMOVE_FLAG )
648                 {
649                      playlist_ItemDelete( p_item );
650                      p_playlist->status.p_item = NULL;
651                 }
652
653                 continue;
654             }
655             /* This input is dying, let it do */
656             else if( p_playlist->p_input->b_die )
657             {
658                 ;
659             }
660             /* This input has finished, ask it to die ! */
661             else if( p_playlist->p_input->b_error
662                       || p_playlist->p_input->b_eof )
663             {
664                 /* TODO FIXME XXX TODO FIXME XXX */
665                 /* Check for autodeletion */
666
667                 if( p_playlist->status.p_item->i_flags & PLAYLIST_DEL_FLAG )
668                 {
669                     p_autodelete_item = p_playlist->status.p_item;
670                 }
671                 input_StopThread( p_playlist->p_input );
672                 /* Select the next playlist item */
673                 vlc_mutex_unlock( &p_playlist->object_lock );
674                 continue;
675             }
676             else if( p_playlist->p_input->i_state != INIT_S )
677             {
678                 vlc_mutex_unlock( &p_playlist->object_lock );
679                 i_vout_destroyed_date =
680                     ObjectGarbageCollector( p_playlist, VLC_OBJECT_VOUT,
681                                             i_vout_destroyed_date );
682                 i_sout_destroyed_date =
683                     ObjectGarbageCollector( p_playlist, VLC_OBJECT_SOUT,
684                                             i_sout_destroyed_date );
685                 vlc_mutex_lock( &p_playlist->object_lock );
686             }
687         }
688         else if( p_playlist->status.i_status != PLAYLIST_STOPPED )
689         {
690             /* Start another input.
691              * Get the next item to play */
692             p_item = NextItem( p_playlist );
693
694             /* We must stop */
695             if( p_item == NULL )
696             {
697                 if( p_autodelete_item )
698                 {
699                     playlist_Delete( p_playlist,
700                                      p_autodelete_item->input.i_id );
701                     p_autodelete_item = NULL;
702                 }
703                 p_playlist->status.i_status = PLAYLIST_STOPPED;
704                 vlc_mutex_unlock( &p_playlist->object_lock );
705                 continue;
706             }
707
708             PlayItem( p_playlist, p_item );
709
710             if( p_autodelete_item )
711             {
712                 playlist_Delete( p_playlist, p_autodelete_item->input.i_id );
713                 p_autodelete_item = NULL;
714             }
715         }
716         else if( p_playlist->status.i_status == PLAYLIST_STOPPED )
717         {
718             if( p_item && p_playlist->status.p_item &&
719                 p_playlist->status.p_item->i_flags & PLAYLIST_REMOVE_FLAG )
720             {
721                  playlist_ItemDelete( p_item );
722                  p_playlist->status.p_item = NULL;
723             }
724
725             /* Collect garbage */
726             vlc_mutex_unlock( &p_playlist->object_lock );
727             i_sout_destroyed_date =
728                 ObjectGarbageCollector( p_playlist, VLC_OBJECT_SOUT, mdate() );
729             i_vout_destroyed_date =
730                 ObjectGarbageCollector( p_playlist, VLC_OBJECT_VOUT, mdate() );
731             vlc_mutex_lock( &p_playlist->object_lock );
732         }
733         vlc_mutex_unlock( &p_playlist->object_lock );
734
735         msleep( INTF_IDLE_SLEEP / 2 );
736
737         /* Stop sleeping earlier if we have work */
738         /* TODO : statistics about this */
739         if ( p_playlist->request.b_request &&
740                         p_playlist->status.i_status == PLAYLIST_RUNNING )
741         {
742             continue;
743         }
744
745         msleep( INTF_IDLE_SLEEP / 2 );
746     }
747
748     /* Playlist dying */
749
750     /* If there is an input, kill it */
751     while( 1 )
752     {
753         vlc_mutex_lock( &p_playlist->object_lock );
754
755         if( p_playlist->p_input == NULL )
756         {
757             vlc_mutex_unlock( &p_playlist->object_lock );
758             break;
759         }
760
761         if( p_playlist->p_input->b_dead )
762         {
763             input_thread_t *p_input;
764
765             /* Unlink current input */
766             p_input = p_playlist->p_input;
767             p_playlist->p_input = NULL;
768             vlc_mutex_unlock( &p_playlist->object_lock );
769
770             /* Destroy input */
771             input_DestroyThread( p_input );
772             /* Unlink current input (_after_ input_DestroyThread for vout
773              * garbage collector)*/
774             vlc_object_detach( p_input );
775
776             /* Destroy object */
777             vlc_object_destroy( p_input );
778             continue;
779         }
780         else if( p_playlist->p_input->b_die )
781         {
782             /* This input is dying, leave it alone */
783             ;
784         }
785         else if( p_playlist->p_input->b_error || p_playlist->p_input->b_eof )
786         {
787             input_StopThread( p_playlist->p_input );
788             vlc_mutex_unlock( &p_playlist->object_lock );
789             continue;
790         }
791         else
792         {
793             p_playlist->p_input->b_eof = 1;
794         }
795
796         vlc_mutex_unlock( &p_playlist->object_lock );
797
798         msleep( INTF_IDLE_SLEEP );
799     }
800
801     /* close all remaining sout */
802     while( ( p_obj = vlc_object_find( p_playlist,
803                                       VLC_OBJECT_SOUT, FIND_CHILD ) ) )
804     {
805         vlc_object_release( p_obj );
806         sout_DeleteInstance( (sout_instance_t*)p_obj );
807     }
808
809     /* close all remaining vout */
810     while( ( p_obj = vlc_object_find( p_playlist,
811                                       VLC_OBJECT_VOUT, FIND_CHILD ) ) )
812     {
813         vlc_object_detach( p_obj );
814         vlc_object_release( p_obj );
815         vout_Destroy( (vout_thread_t *)p_obj );
816     }
817 }
818
819 /* Queue for items to preparse */
820 static void RunPreparse ( playlist_preparse_t *p_obj )
821 {
822     playlist_t *p_playlist = (playlist_t *)p_obj->p_parent;
823     vlc_bool_t b_sleep;
824
825     /* Tell above that we're ready */
826     vlc_thread_ready( p_obj );
827
828     while( !p_playlist->b_die )
829     {
830         vlc_mutex_lock( &p_obj->object_lock );
831
832         if( p_obj->i_waiting > 0 )
833         {
834             input_item_t *p_current = p_obj->pp_waiting[0];
835             REMOVE_ELEM( p_obj->pp_waiting, p_obj->i_waiting, 0 );
836             vlc_mutex_unlock( &p_obj->object_lock );
837             input_Preparse( p_playlist, p_current );
838             var_SetInteger( p_playlist, "item-change", p_current->i_id );
839             vlc_mutex_lock( &p_obj->object_lock );
840         }
841         b_sleep = ( p_obj->i_waiting == 0 );
842
843         vlc_mutex_unlock( &p_obj->object_lock );
844
845         if( p_obj->i_waiting == 0 )
846         {
847             msleep( INTF_IDLE_SLEEP );
848         }
849     }
850 }
851
852 /*****************************************************************************
853  * NextItem
854  *****************************************************************************
855  * This function calculates the next playlist item, depending
856  * on the playlist course mode (forward, backward, random, view,...).
857  *****************************************************************************/
858 static playlist_item_t * NextItem( playlist_t *p_playlist )
859 {
860     playlist_item_t *p_new = NULL;
861     int i_skip,i_goto,i, i_new, i_count ;
862     playlist_view_t *p_view;
863
864     vlc_bool_t b_loop = var_GetBool( p_playlist, "loop" );
865     vlc_bool_t b_random = var_GetBool( p_playlist, "random" );
866     vlc_bool_t b_repeat = var_GetBool( p_playlist, "repeat" );
867     vlc_bool_t b_playstop = var_GetBool( p_playlist, "play-and-stop" );
868
869 #ifdef PLAYLIST_PROFILE
870     /* Calculate time needed */
871     int64_t start = mdate();
872 #endif
873
874     /* Handle quickly a few special cases */
875
876     /* No items to play */
877     if( p_playlist->i_size == 0 )
878     {
879         msg_Info( p_playlist, "playlist is empty" );
880         return NULL;
881     }
882     /* Nothing requested */
883     if( !p_playlist->request.b_request && p_playlist->status.p_item == NULL )
884     {
885         msg_Dbg( p_playlist,"nothing requested, starting" );
886     }
887
888     /* Repeat and play/stop */
889     if( !p_playlist->request.b_request && b_repeat == VLC_TRUE &&
890          p_playlist->status.p_item )
891     {
892         msg_Dbg( p_playlist,"repeating item" );
893         return p_playlist->status.p_item;
894     }
895
896     if( !p_playlist->request.b_request && b_playstop == VLC_TRUE )
897     {
898         msg_Dbg( p_playlist,"stopping (play and stop)");
899         return NULL;
900     }
901
902     if( !p_playlist->request.b_request && p_playlist->status.p_item &&
903         !( p_playlist->status.p_item->i_flags & PLAYLIST_SKIP_FLAG ) )
904     {
905         msg_Dbg( p_playlist, "no-skip mode, stopping") ;
906         return NULL;
907     }
908
909     /* TODO: improve this (only use current node) */
910     /* TODO: use the "shuffled view" internally ? */
911     /* Random case. This is an exception: if request, but request is skip +- 1
912      * we don't go to next item but select a new random one. */
913     if( b_random &&
914         ( !p_playlist->request.b_request ||
915         ( p_playlist->request.b_request && ( p_playlist->request.p_item == NULL ||
916           p_playlist->request.i_skip == 1 || p_playlist->request.i_skip == -1 ) ) ) )
917     {
918         /* how many items to choose from ? */
919         i_count = 0;
920         for ( i = 0; i < p_playlist->i_size; i++ )
921         {
922             if ( p_playlist->pp_items[i]->i_nb_played == 0 )
923                 i_count++;
924         }
925         /* Nothing left? */
926         if ( i_count == 0 )
927         {
928             /* Don't loop? Exit! */
929             if( !b_loop )
930                 return NULL;
931             /* Otherwise reset the counter */
932             for ( i = 0; i < p_playlist->i_size; i++ )
933             {
934                 p_playlist->pp_items[i]->i_nb_played = 0;
935             }
936             i_count = p_playlist->i_size;
937         }
938         srand( (unsigned int)mdate() );
939         i = rand() % i_count + 1 ;
940         /* loop thru the list and count down the unplayed items to the selected one */
941         for ( i_new = 0; i_new < p_playlist->i_size && i > 0; i_new++ )
942         {
943             if ( p_playlist->pp_items[i_new]->i_nb_played == 0 )
944                 i--;
945         }
946         i_new--;
947
948         p_playlist->request.i_skip = 0;
949         p_playlist->request.b_request = VLC_FALSE;
950         return p_playlist->pp_items[i_new];
951     }
952
953     /* Start the real work */
954     if( p_playlist->request.b_request )
955     {
956 #ifdef PLAYLIST_DEBUG
957         msg_Dbg( p_playlist,"processing request" );
958 #endif
959         /* We are not playing from a view */
960         if( p_playlist->request.i_view == -1  )
961         {
962 #ifdef PLAYLIST_DEBUG
963             msg_Dbg( p_playlist, "non-view mode request");
964 #endif
965             /* Directly select the item, just like now */
966             p_new = p_playlist->request.p_item;
967             i_skip = p_playlist->request.i_skip;
968             i_goto = p_playlist->request.i_goto;
969
970             if( p_playlist->i_index < 0 ) p_playlist->i_index = 0;
971             if ( p_new == NULL )
972                 p_new = p_playlist->pp_items[p_playlist->i_index];
973
974             if( i_goto >= 0  && i_goto < p_playlist->i_size )
975             {
976                 p_playlist->i_index = i_goto;
977                 p_new = p_playlist->pp_items[p_playlist->i_index];
978                 p_playlist->request.i_goto = -1;
979             }
980
981             if( i_skip != 0 )
982             {
983                 if( p_playlist->i_index + i_skip < p_playlist->i_size &&
984                     p_playlist->i_index + i_skip >=  0 )
985                 {
986                     p_playlist->i_index += i_skip;
987                     p_new = p_playlist->pp_items[p_playlist->i_index];
988                 }
989                 p_playlist->request.i_skip = 0;
990             }
991             if( !( p_new->i_flags & PLAYLIST_SKIP_FLAG ) )
992             {
993                 return NULL;
994             }
995         }
996         else
997         {
998 #ifdef PLAYLIST_DEBUG
999             msg_Dbg( p_playlist, "view mode request" );
1000 #endif
1001             p_new = p_playlist->request.p_item;
1002             i_skip = p_playlist->request.i_skip;
1003
1004             /* If we are asked for a node, take its first item */
1005             if( p_playlist->request.p_item == NULL && i_skip == 0 )
1006             {
1007                 i_skip++;
1008             }
1009
1010             p_view = playlist_ViewFind( p_playlist,p_playlist->request.i_view );
1011             p_playlist->status.p_node = p_playlist->request.p_node;
1012             p_playlist->status.i_view = p_playlist->request.i_view;
1013             if( !p_view )
1014             {
1015                 msg_Err( p_playlist, "p_view is NULL and should not! (requested view is %i", p_playlist->request.i_view );
1016             }
1017             else if( i_skip > 0 )
1018             {
1019                 for( i = i_skip; i > 0 ; i-- )
1020                 {
1021                     p_new = playlist_FindNextFromParent( p_playlist,
1022                                     p_playlist->request.i_view,
1023                                     p_view->p_root,
1024                                     p_playlist->request.p_node,
1025                                     p_new );
1026                     if( p_new == NULL )
1027                     {
1028 #ifdef PLAYLIST_DEBUG
1029                         msg_Dbg( p_playlist, "looping" );
1030 #endif
1031                         p_new = playlist_FindNextFromParent( p_playlist,
1032                                   p_playlist->request.i_view,
1033                                   p_view->p_root,
1034                                   p_view->p_root,
1035                                   NULL );
1036                         if( p_new == NULL ) break;
1037                     }
1038                 }
1039             }
1040             else if( i_skip < 0 )
1041             {
1042                 for( i = i_skip; i < 0 ; i++ )
1043                 {
1044                     p_new = playlist_FindPrevFromParent( p_playlist,
1045                                     p_playlist->request.i_view,
1046                                     p_view->p_root,
1047                                     p_playlist->request.p_node,
1048                                     p_new );
1049                     if( p_new == NULL )
1050                     {
1051                     /* We reach the beginning of the playlist.
1052                        Go back to the last item. */
1053                         p_new = playlist_RecursiveFindLast( p_playlist,
1054                                                             p_view->p_root );
1055                     }
1056                     if( p_new == NULL ) break;
1057                 }
1058
1059             }
1060         }
1061         /* Clear the request */
1062         p_playlist->request.b_request = VLC_FALSE;
1063     }
1064     /* "Automatic" item change ( next ) */
1065     else
1066     {
1067         p_playlist->request_date = 0;
1068
1069         if( p_playlist->status.i_view == -1 )
1070         {
1071 #ifdef PLAYLIST_DEBUG
1072         msg_Dbg( p_playlist, "no request - old mode" );
1073 #endif
1074             if( p_playlist->i_index + 1 < p_playlist->i_size )
1075             {
1076                 p_playlist->i_index++;
1077                 p_new = p_playlist->pp_items[p_playlist->i_index];
1078                 if( !( p_new->i_flags & PLAYLIST_SKIP_FLAG ) )
1079                 {
1080                     return NULL;
1081                 }
1082             }
1083             else
1084             {
1085                 if( b_loop && p_playlist->i_size > 0)
1086                 {
1087                     p_playlist->i_index = 0;
1088                     p_new = p_playlist->pp_items[0];
1089                 }
1090                 else
1091                     p_new = NULL;
1092             }
1093         }
1094         /* We are playing with a view */
1095         else
1096         {
1097 #ifdef PLAYLIST_DEBUG
1098             msg_Dbg( p_playlist,"no request - from a view" );
1099 #endif
1100             playlist_view_t *p_view =
1101                     playlist_ViewFind( p_playlist,
1102                                    p_playlist->status.i_view );
1103             if( !p_view )
1104             {
1105                 msg_Err( p_playlist, "p_view is NULL and should not! (FIXME)" );
1106             }
1107             else
1108             {
1109                 p_new = playlist_FindNextFromParent( p_playlist,
1110                             p_playlist->status.i_view,
1111                             p_view->p_root,
1112                             p_playlist->status.p_node,
1113                             p_playlist->status.p_item );
1114                 if( p_new == NULL && b_loop )
1115                 {
1116 #ifdef PLAYLIST_DEBUG
1117                     msg_Dbg( p_playlist, "looping" );
1118 #endif
1119                     p_new = playlist_FindNextFromParent( p_playlist,
1120                                    p_playlist->status.i_view,
1121                                    p_view->p_root,
1122                                    p_view->p_root,
1123                                    NULL );
1124                 }
1125                 if( p_new != NULL && !(p_new->i_flags & PLAYLIST_SKIP_FLAG) )
1126                     return NULL;
1127             }
1128         }
1129     }
1130
1131     /* Reset index */
1132     if( p_playlist->i_index >= 0 && p_new != NULL &&
1133             p_playlist->pp_items[p_playlist->i_index] != p_new )
1134     {
1135         p_playlist->i_index = playlist_GetPositionById( p_playlist,
1136                                                         p_new->input.i_id );
1137     }
1138
1139 #ifdef PLAYLIST_PROFILE
1140     msg_Dbg(p_playlist,"next item found in "I64Fi " us", mdate()-start );
1141 #endif
1142
1143     if( p_new == NULL )
1144     {
1145         msg_Info( p_playlist, "nothing to play" );
1146     }
1147     return p_new;
1148 }
1149
1150 /*****************************************************************************
1151  * PlayItem: start the input thread for an item
1152  ****************************************************************************/
1153 static int PlayItem( playlist_t *p_playlist, playlist_item_t *p_item )
1154 {
1155     vlc_value_t val;
1156
1157     msg_Dbg( p_playlist, "creating new input thread" );
1158
1159     p_item->i_nb_played++;
1160     p_playlist->status.p_item = p_item;
1161
1162     p_playlist->i_index = playlist_GetPositionById( p_playlist,
1163                                                     p_item->input.i_id );
1164
1165 #ifdef PLAYLIST_PROFILE
1166     if( p_playlist->request_date != 0 )
1167     {
1168         msg_Dbg( p_playlist, "request processed after "I64Fi " us",
1169                   mdate() - p_playlist->request_date );
1170     }
1171 #endif
1172
1173     p_playlist->p_input = input_CreateThread( p_playlist, &p_item->input );
1174
1175     val.i_int = p_item->input.i_id;
1176     /* unlock the playlist to set the var...mmm */
1177     vlc_mutex_unlock( &p_playlist->object_lock);
1178     var_Set( p_playlist, "playlist-current", val);
1179     vlc_mutex_lock( &p_playlist->object_lock);
1180
1181     return VLC_SUCCESS;
1182
1183 }