603fdc3dd7160db1fbe8a255ee65932b64f071f8
[vlc.git] / src / playlist / engine.c
1 /*****************************************************************************
2  * engine.c : Run the playlist and handle its control
3  *****************************************************************************
4  * Copyright (C) 1999-2008 the VideoLAN team
5  *
6  * Authors: Samuel Hocevar <sam@zoy.org>
7  *          ClĂ©ment Stenac <zorglub@videolan.org>
8  *
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.
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 General Public License for more details.
18  *
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  *****************************************************************************/
23
24 #ifdef HAVE_CONFIG_H
25 # include "config.h"
26 #endif
27
28 #include <assert.h>
29 #include <vlc_common.h>
30 #include <vlc_sout.h>
31 #include <vlc_playlist.h>
32 #include <vlc_interface.h>
33 #include "playlist_internal.h"
34 #include "stream_output/stream_output.h" /* sout_DeleteInstance */
35
36 /*****************************************************************************
37  * Local prototypes
38  *****************************************************************************/
39 static void VariablesInit( playlist_t *p_playlist );
40 static void playlist_Destructor( vlc_object_t * p_this );
41 static void playlist_Destructor( vlc_object_t * p_this );
42
43 static int RandomCallback( vlc_object_t *p_this, char const *psz_cmd,
44                            vlc_value_t oldval, vlc_value_t newval, void *a )
45 {
46     (void)psz_cmd; (void)oldval; (void)newval; (void)a;
47
48     ((playlist_t*)p_this)->b_reset_currently_playing = true;
49     playlist_Signal( ((playlist_t*)p_this) );
50     return VLC_SUCCESS;
51 }
52
53 /**
54  * Create playlist
55  *
56  * Create a playlist structure.
57  * \param p_parent the vlc object that is to be the parent of this playlist
58  * \return a pointer to the created playlist, or NULL on error
59  */
60 playlist_t * playlist_Create( vlc_object_t *p_parent )
61 {
62     static const char playlist_name[] = "playlist";
63     playlist_t *p_playlist;
64     bool b_save;
65
66     /* Allocate structure */
67     p_playlist = vlc_custom_create( p_parent, sizeof( *p_playlist ),
68                                     VLC_OBJECT_GENERIC, playlist_name );
69     if( !p_playlist )
70         return NULL;
71
72     TAB_INIT( p_playlist->i_sds, p_playlist->pp_sds );
73
74     libvlc_priv(p_parent->p_libvlc)->p_playlist = p_playlist;
75
76     VariablesInit( p_playlist );
77
78     /* Initialise data structures */
79     vlc_mutex_init( &p_playlist->gc_lock );
80     p_playlist->i_last_playlist_id = 0;
81     p_playlist->p_input = NULL;
82
83     p_playlist->gc_date = 0;
84     p_playlist->b_cant_sleep = false;
85
86     ARRAY_INIT( p_playlist->items );
87     ARRAY_INIT( p_playlist->all_items );
88     ARRAY_INIT( p_playlist->current );
89
90     p_playlist->i_current_index = 0;
91     p_playlist->b_reset_currently_playing = true;
92     p_playlist->last_rebuild_date = 0;
93
94     p_playlist->b_tree = var_CreateGetBool( p_playlist, "playlist-tree" );
95
96     p_playlist->b_doing_ml = false;
97
98     p_playlist->b_auto_preparse =
99                         var_CreateGetBool( p_playlist, "auto-preparse" ) ;
100
101     p_playlist->p_root_category = playlist_NodeCreate( p_playlist, NULL, NULL,
102                                     0, NULL );
103     p_playlist->p_root_onelevel = playlist_NodeCreate( p_playlist, NULL, NULL,
104                                     0, p_playlist->p_root_category->p_input );
105
106     if( !p_playlist->p_root_category || !p_playlist->p_root_onelevel )
107         return NULL;
108
109     /* Create playlist and media library */
110     playlist_NodesPairCreate( p_playlist, _( "Playlist" ),
111                             &p_playlist->p_local_category,
112                             &p_playlist->p_local_onelevel, false );
113
114     p_playlist->p_local_category->i_flags |= PLAYLIST_RO_FLAG;
115     p_playlist->p_local_onelevel->i_flags |= PLAYLIST_RO_FLAG;
116
117     if( !p_playlist->p_local_category || !p_playlist->p_local_onelevel ||
118         !p_playlist->p_local_category->p_input ||
119         !p_playlist->p_local_onelevel->p_input )
120         return NULL;
121
122     if( config_GetInt( p_playlist, "media-library") )
123     {
124         playlist_NodesPairCreate( p_playlist, _( "Media Library" ),
125                             &p_playlist->p_ml_category,
126                             &p_playlist->p_ml_onelevel, false );
127
128         if(!p_playlist->p_ml_category || !p_playlist->p_ml_onelevel)
129             return NULL;
130
131         p_playlist->p_ml_category->i_flags |= PLAYLIST_RO_FLAG;
132         p_playlist->p_ml_onelevel->i_flags |= PLAYLIST_RO_FLAG;
133     }
134     else
135     {
136         p_playlist->p_ml_category = p_playlist->p_ml_onelevel = NULL;
137     }
138
139     /* Initial status */
140     p_playlist->status.p_item = NULL;
141     p_playlist->status.p_node = p_playlist->p_local_onelevel;
142     p_playlist->request.b_request = false;
143     p_playlist->status.i_status = PLAYLIST_STOPPED;
144
145     p_playlist->i_sort = SORT_ID;
146     p_playlist->i_order = ORDER_NORMAL;
147
148
149     b_save = p_playlist->b_auto_preparse;
150     p_playlist->b_auto_preparse = false;
151     playlist_MLLoad( p_playlist );
152     p_playlist->b_auto_preparse = true;
153
154     vlc_object_set_destructor( p_playlist, playlist_Destructor );
155
156     return p_playlist;
157 }
158
159 /**
160  * Destroy playlist
161  *
162  * Destroy a playlist structure.
163  * \param p_playlist the playlist object
164  * \return nothing
165  */
166
167 static void playlist_Destructor( vlc_object_t * p_this )
168 {
169     playlist_t * p_playlist = (playlist_t *)p_this;
170
171     if( p_playlist->p_preparse )
172         vlc_object_release( p_playlist->p_preparse );
173
174     if( p_playlist->p_fetcher )
175         vlc_object_release( p_playlist->p_fetcher );
176
177     msg_Dbg( p_this, "Destroyed" );
178 }
179
180 /* Destroy remaining objects */
181 static void ObjectGarbageCollector( playlist_t *p_playlist, bool b_force )
182 {
183     if( !b_force )
184     {
185         if( mdate() - p_playlist->gc_date < 1000000 )
186         {
187             p_playlist->b_cant_sleep = true;
188             return;
189         }
190         else if( p_playlist->gc_date == 0 )
191             return;
192     }
193
194     vlc_mutex_lock( &p_playlist->gc_lock );
195     p_playlist->b_cant_sleep = false;
196     vlc_mutex_unlock( &p_playlist->gc_lock );
197 }
198
199 /* Input Callback */
200 static void input_state_changed( const vlc_event_t * event, void * data )
201 {
202     (void)event;
203     playlist_t * p_playlist = data;
204     playlist_Signal( p_playlist );
205 }
206
207 /* Input Callback */
208 static void input_selected_stream_changed( const vlc_event_t * event, void * data )
209 {
210     (void)event;
211     playlist_t * p_playlist = data;
212     PL_LOCK;
213     p_playlist->gc_date = mdate();
214     vlc_object_signal_unlocked( p_playlist );
215     PL_UNLOCK;
216 }
217
218 /* Internals */
219 void playlist_release_current_input( playlist_t * p_playlist )
220 {
221     vlc_assert_locked( &(vlc_internals(p_playlist)->lock) );
222
223     if( !p_playlist->p_input ) return;
224
225     input_thread_t * p_input = p_playlist->p_input;
226     vlc_event_manager_t * p_em = input_get_event_manager( p_input );
227
228     vlc_event_detach( p_em, vlc_InputStateChanged,
229                       input_state_changed, p_playlist );
230     vlc_event_detach( p_em, vlc_InputSelectedStreamChanged,
231                       input_selected_stream_changed, p_playlist );
232     p_playlist->p_input = NULL;
233
234     /* Release the playlist lock, because we may get stuck
235      * in vlc_object_release() for some time. */
236     PL_UNLOCK;
237     vlc_object_release( p_input );
238     PL_LOCK;
239 }
240
241 void playlist_set_current_input(
242     playlist_t * p_playlist, input_thread_t * p_input )
243 {
244     vlc_assert_locked( &(vlc_internals(p_playlist)->lock) );
245
246     playlist_release_current_input( p_playlist );
247
248     if( p_input )
249     {
250         vlc_object_yield( p_input );
251         p_playlist->p_input = p_input;
252         vlc_event_manager_t * p_em = input_get_event_manager( p_input );
253         vlc_event_attach( p_em, vlc_InputStateChanged,
254                           input_state_changed, p_playlist );
255         vlc_event_attach( p_em, vlc_InputSelectedStreamChanged,
256                           input_selected_stream_changed, p_playlist );
257     }
258 }
259
260 /** Get current playing input.
261  */
262 input_thread_t * playlist_CurrentInput( playlist_t * p_playlist )
263 {
264     input_thread_t * p_input;
265     PL_LOCK;
266     p_input = p_playlist->p_input;
267     if( p_input ) vlc_object_yield( p_input );
268     PL_UNLOCK;
269     return p_input;
270 }
271
272
273 /**
274  * @}
275  */
276
277 /**
278  * Main loop
279  *
280  * Main loop for the playlist
281  * \param p_playlist the playlist object
282  * \return nothing
283  */
284 void playlist_MainLoop( playlist_t *p_playlist )
285 {
286     playlist_item_t *p_item = NULL;
287     bool b_playexit = var_GetBool( p_playlist, "play-and-exit" );
288     PL_LOCK;
289
290     if( p_playlist->b_reset_currently_playing &&
291         mdate() - p_playlist->last_rebuild_date > 30000 ) // 30 ms
292     {
293         ResetCurrentlyPlaying( p_playlist, var_GetBool( p_playlist, "random" ),
294                              p_playlist->status.p_item );
295         p_playlist->last_rebuild_date = mdate();
296     }
297
298 check_input:
299     /* If there is an input, check that it doesn't need to die. */
300     if( p_playlist->p_input )
301     {
302         if( p_playlist->request.b_request && !p_playlist->p_input->b_die )
303         {
304             PL_DEBUG( "incoming request - stopping current input" );
305             input_StopThread( p_playlist->p_input );
306         }
307
308         /* This input is dead. Remove it ! */
309         if( p_playlist->p_input->b_dead )
310         {
311             int i_activity;
312             input_thread_t *p_input;
313             sout_instance_t **pp_sout =
314                 &libvlc_priv(p_playlist->p_libvlc)->p_sout;
315
316             PL_DEBUG( "dead input" );
317
318             p_input = p_playlist->p_input;
319
320             assert( *pp_sout == NULL );
321             if( var_CreateGetBool( p_input, "sout-keep" ) )
322                 *pp_sout = input_DetachSout( p_input );
323
324             /* Destroy input */
325             playlist_release_current_input( p_playlist );
326
327             p_playlist->gc_date = mdate();
328             p_playlist->b_cant_sleep = true;
329
330             if( p_playlist->status.p_item->i_flags
331                 & PLAYLIST_REMOVE_FLAG )
332             {
333                  PL_DEBUG( "%s was marked for deletion, deleting",
334                                  PLI_NAME( p_playlist->status.p_item  ) );
335                  playlist_ItemDelete( p_playlist->status.p_item );
336                  if( p_playlist->request.p_item == p_playlist->status.p_item )
337                      p_playlist->request.p_item = NULL;
338                  p_playlist->status.p_item = NULL;
339             }
340
341             i_activity= var_GetInteger( p_playlist, "activity" );
342             var_SetInteger( p_playlist, "activity", i_activity -
343                             DEFAULT_INPUT_ACTIVITY );
344
345             goto check_input;
346         }
347         /* This input is dying, let it do */
348         else if( p_playlist->p_input->b_die )
349         {
350             PL_DEBUG( "dying input" );
351             PL_UNLOCK;
352             msleep( INTF_IDLE_SLEEP );
353             PL_LOCK;
354             goto check_input;
355         }
356         /* This input has finished, ask it to die ! */
357         else if( p_playlist->p_input->b_error
358                   || p_playlist->p_input->b_eof )
359         {
360             PL_DEBUG( "finished input" );
361             input_StopThread( p_playlist->p_input );
362             /* No need to wait here, we'll wait in the p_input->b_die case */
363             goto check_input;
364         }
365         else if( p_playlist->p_input->i_state != INIT_S )
366         {
367             PL_UNLOCK;
368             ObjectGarbageCollector( p_playlist, false );
369             PL_LOCK;
370         }
371     }
372     else
373     {
374         /* No input. Several cases
375          *  - No request, running status -> start new item
376          *  - No request, stopped status -> collect garbage
377          *  - Request, running requested -> start new item
378          *  - Request, stopped requested -> collect garbage
379         */
380         int i_status = p_playlist->request.b_request ?
381             p_playlist->request.i_status : p_playlist->status.i_status;
382         if( i_status != PLAYLIST_STOPPED )
383         {
384             msg_Dbg( p_playlist, "starting new item" );
385             p_item = playlist_NextItem( p_playlist );
386
387             if( p_item == NULL )
388             {
389                 msg_Dbg( p_playlist, "nothing to play" );
390                 p_playlist->status.i_status = PLAYLIST_STOPPED;
391                 PL_UNLOCK;
392
393                 if( b_playexit == true )
394                 {
395                     msg_Info( p_playlist, "end of playlist, exiting" );
396                     vlc_object_kill( p_playlist->p_libvlc );
397                 }
398                 ObjectGarbageCollector( p_playlist, true );
399                 return;
400              }
401              playlist_PlayItem( p_playlist, p_item );
402          }
403          else
404          {
405             const bool b_gc_forced = p_playlist->status.i_status != PLAYLIST_STOPPED;
406
407             p_playlist->status.i_status = PLAYLIST_STOPPED;
408             if( p_playlist->status.p_item &&
409                 p_playlist->status.p_item->i_flags & PLAYLIST_REMOVE_FLAG )
410             {
411                 PL_DEBUG( "deleting item marked for deletion" );
412                 playlist_ItemDelete( p_playlist->status.p_item );
413                 p_playlist->status.p_item = NULL;
414             }
415
416             /* Collect garbage */
417             PL_UNLOCK;
418             ObjectGarbageCollector( p_playlist, b_gc_forced );
419             PL_LOCK;
420         }
421     }
422     PL_UNLOCK;
423 }
424
425 /**
426  * Last loop
427  *
428  * The playlist is dying so do the last loop
429  * \param p_playlist the playlist object
430  * \return nothing
431 */
432 void playlist_LastLoop( playlist_t *p_playlist )
433 {
434     /* If there is an input, kill it */
435     while( 1 )
436     {
437         PL_LOCK;
438         if( p_playlist->p_input == NULL )
439         {
440             PL_UNLOCK;
441             break;
442         }
443
444         if( p_playlist->p_input->b_dead )
445         {
446             /* remove input */
447             playlist_release_current_input( p_playlist );
448
449             /* sout-keep: no need to anything here.
450              * The last input will destroy its sout, if any, by itself */
451
452             PL_UNLOCK;
453             continue;
454         }
455         else if( p_playlist->p_input->b_die )
456         {
457             /* This input is dying, leave it alone */
458             ;
459         }
460         else if( p_playlist->p_input->b_error || p_playlist->p_input->b_eof )
461         {
462             input_StopThread( p_playlist->p_input );
463             PL_UNLOCK;
464             continue;
465         }
466         else
467         {
468             p_playlist->p_input->b_eof = 1;
469         }
470         PL_UNLOCK;
471
472         msleep( INTF_IDLE_SLEEP );
473     }
474
475 #ifdef ENABLE_SOUT
476     /* close the remaining sout-keep (if there was no input atm) */
477     sout_instance_t *p_sout = libvlc_priv (p_playlist->p_libvlc)->p_sout;
478     if (p_sout)
479         sout_DeleteInstance( p_sout );
480 #endif
481
482     if( p_playlist->status.p_node &&
483         p_playlist->status.p_node->i_flags & PLAYLIST_REMOVE_FLAG )
484     {
485          PL_DEBUG( "%s was marked for deletion, deleting",
486                          PLI_NAME( p_playlist->status.p_node  ) );
487          playlist_ItemDelete( p_playlist->status.p_node );
488          p_playlist->status.p_node = NULL;
489     }
490     if( p_playlist->status.p_item &&
491         p_playlist->status.p_item->i_flags & PLAYLIST_REMOVE_FLAG )
492     {
493          PL_DEBUG( "%s was marked for deletion, deleting",
494                          PLI_NAME( p_playlist->status.p_item  ) );
495          playlist_ItemDelete( p_playlist->status.p_item );
496          p_playlist->status.p_item = NULL;
497     }
498
499     /* Core should have terminated all SDs before the playlist */
500     /* TODO: It fails to do so when not playing anything -- Courmisch */
501     playlist_ServicesDiscoveryKillAll( p_playlist );
502     playlist_MLDump( p_playlist );
503
504     PL_LOCK;
505     FOREACH_ARRAY( playlist_item_t *p_del, p_playlist->all_items )
506         free( p_del->pp_children );
507         vlc_gc_decref( p_del->p_input );
508         free( p_del );
509     FOREACH_END();
510     ARRAY_RESET( p_playlist->all_items );
511
512     ARRAY_RESET( p_playlist->items );
513     ARRAY_RESET( p_playlist->current );
514
515     PL_UNLOCK;
516 }
517
518 /**
519  * Preparse loop
520  *
521  * Main loop for preparser queue
522  * \param p_obj items to preparse
523  * \return nothing
524  */
525 void playlist_PreparseLoop( playlist_preparse_t *p_obj )
526 {
527     playlist_t *p_playlist = (playlist_t *)p_obj->p_parent;
528     input_item_t *p_current;
529     int i_activity;
530
531     vlc_object_lock( p_obj );
532
533     while( vlc_object_alive( p_obj ) )
534     {
535         if( p_obj->i_waiting == 0 )
536         {
537             vlc_object_wait( p_obj );
538             continue;
539         }
540
541         p_current = p_obj->pp_waiting[0];
542         REMOVE_ELEM( p_obj->pp_waiting, p_obj->i_waiting, 0 );
543         vlc_object_unlock( p_obj );
544
545         PL_LOCK;
546         if( p_current )
547         {
548             if( p_current->i_type == ITEM_TYPE_FILE )
549             {
550                 stats_TimerStart( p_playlist, "Preparse run",
551                                   STATS_TIMER_PREPARSE );
552                 /* Do not preparse if it is already done (like by playing it) */
553                 if( !input_item_IsPreparsed( p_current ) )
554                 {
555                     PL_UNLOCK;
556                     input_Preparse( p_playlist, p_current );
557                     PL_LOCK;
558                 }
559                 stats_TimerStop( p_playlist, STATS_TIMER_PREPARSE );
560                 PL_UNLOCK;
561                 input_item_SetPreparsed( p_current, true );
562                 var_SetInteger( p_playlist, "item-change", p_current->i_id );
563                 PL_LOCK;
564             }
565             /* If we haven't retrieved enough meta, add to secondary queue
566              * which will run the "meta fetchers".
567              * This only checks for meta, not for art
568              * \todo don't do this for things we won't get meta for, like vids
569              */
570             char *psz_arturl = input_item_GetArtURL( p_current );
571             char *psz_name = input_item_GetName( p_current );
572             if( p_playlist->p_fetcher->i_art_policy == ALBUM_ART_ALL &&
573                         ( !psz_arturl || strncmp( psz_arturl, "file://", 7 ) ) )
574             {
575                 PL_DEBUG("meta ok for %s, need to fetch art", psz_name );
576                 vlc_object_lock( p_playlist->p_fetcher );
577                 INSERT_ELEM( p_playlist->p_fetcher->pp_waiting,
578                              p_playlist->p_fetcher->i_waiting,
579                              p_playlist->p_fetcher->i_waiting, p_current);
580                 vlc_object_signal_unlocked( p_playlist->p_fetcher );
581                 vlc_object_unlock( p_playlist->p_fetcher );
582             }
583             else
584             {
585                 PL_DEBUG( "no fetch required for %s (art currently %s)",
586                           psz_name, psz_arturl );
587                 vlc_gc_decref( p_current );
588             }
589             free( psz_name );
590             free( psz_arturl );
591             PL_UNLOCK;
592         }
593         else
594             PL_UNLOCK;
595
596         vlc_object_lock( p_obj );
597         i_activity = var_GetInteger( p_playlist, "activity" );
598         if( i_activity < 0 ) i_activity = 0;
599         vlc_object_unlock( p_obj );
600         /* Sleep at least 1ms */
601         msleep( (i_activity+1) * 1000 );
602         vlc_object_lock( p_obj );
603     }
604
605     for( int i = 0; i < p_obj->i_waiting; i++ )
606     {
607         vlc_gc_decref( p_obj->pp_waiting[i] );
608         REMOVE_ELEM( p_obj->pp_waiting, p_obj->i_waiting, 0 );
609     }
610
611     vlc_object_unlock( p_obj );
612 }
613
614 /**
615  * Fetcher loop
616  *
617  * Main loop for secondary preparser queue
618  * \param p_obj items to preparse
619  * \return nothing
620  */
621 void playlist_FetcherLoop( playlist_fetcher_t *p_obj )
622 {
623     playlist_t *p_playlist = (playlist_t *)p_obj->p_parent;
624     input_item_t *p_item;
625     int i_activity;
626
627     vlc_object_lock( p_obj );
628
629     while( vlc_object_alive( p_obj ) )
630     {
631         if( p_obj->i_waiting == 0 )
632         {
633             vlc_object_wait( p_obj );
634             continue;
635         }
636
637         p_item = p_obj->pp_waiting[0];
638         REMOVE_ELEM( p_obj->pp_waiting, p_obj->i_waiting, 0 );
639         vlc_object_unlock( p_obj );
640         if( p_item )
641         {
642             int i_ret;
643
644             /* Check if it is not yet preparsed and if so wait for it (at most 0.5s)
645              * (This can happen if we fetch art on play)
646              * FIXME this doesn't work if we need to fetch meta before art ... */
647             for( i_ret = 0; i_ret < 10 && !input_item_IsPreparsed( p_item ); i_ret++ )
648             {
649                 bool b_break;
650                 PL_LOCK;
651                 b_break = ( !p_playlist->p_input || input_GetItem(p_playlist->p_input) != p_item  ||
652                             p_playlist->p_input->b_die || p_playlist->p_input->b_eof || p_playlist->p_input->b_error );
653                 PL_UNLOCK;
654                 if( b_break )
655                     break;
656                 msleep( 50000 );
657             }
658
659             i_ret = input_ArtFind( p_playlist, p_item );
660             if( i_ret == 1 )
661             {
662                 PL_DEBUG( "downloading art for %s", p_item->psz_name );
663                 if( input_DownloadAndCacheArt( p_playlist, p_item ) )
664                     input_item_SetArtNotFound( p_item, true );
665                 else {
666                     input_item_SetArtFetched( p_item, true );
667                     var_SetInteger( p_playlist, "item-change",
668                                     p_item->i_id );
669                 }
670             }
671             else if( i_ret == 0 ) /* Was in cache */
672             {
673                 PL_DEBUG( "found art for %s in cache", p_item->psz_name );
674                 input_item_SetArtFetched( p_item, true );
675                 var_SetInteger( p_playlist, "item-change", p_item->i_id );
676             }
677             else
678             {
679                 PL_DEBUG( "art not found for %s", p_item->psz_name );
680                 input_item_SetArtNotFound( p_item, true );
681             }
682             vlc_gc_decref( p_item );
683         }
684         vlc_object_lock( p_obj );
685         i_activity = var_GetInteger( p_playlist, "activity" );
686         if( i_activity < 0 ) i_activity = 0;
687         vlc_object_unlock( p_obj );
688         /* Sleep at least 1ms */
689         msleep( (i_activity+1) * 1000 );
690         vlc_object_lock( p_obj );
691     }
692
693     for( int i = 0; i < p_obj->i_waiting; i++ )
694     {
695         vlc_gc_decref( p_obj->pp_waiting[i] );
696         REMOVE_ELEM( p_obj->pp_waiting, p_obj->i_waiting, 0 );
697     }
698
699     vlc_object_unlock( p_obj );
700 }
701
702 static void VariablesInit( playlist_t *p_playlist )
703 {
704     vlc_value_t val;
705     /* These variables control updates */
706     var_Create( p_playlist, "intf-change", VLC_VAR_BOOL );
707     val.b_bool = true;
708     var_Set( p_playlist, "intf-change", val );
709
710     var_Create( p_playlist, "item-change", VLC_VAR_INTEGER );
711     val.i_int = -1;
712     var_Set( p_playlist, "item-change", val );
713
714     var_Create( p_playlist, "item-deleted", VLC_VAR_INTEGER );
715     val.i_int = -1;
716     var_Set( p_playlist, "item-deleted", val );
717
718     var_Create( p_playlist, "item-append", VLC_VAR_ADDRESS );
719
720     var_Create( p_playlist, "playlist-current", VLC_VAR_INTEGER );
721     val.i_int = -1;
722     var_Set( p_playlist, "playlist-current", val );
723
724     var_Create( p_playlist, "activity", VLC_VAR_INTEGER );
725     var_SetInteger( p_playlist, "activity", 0 );
726
727     /* Variables to control playback */
728     var_CreateGetBool( p_playlist, "play-and-stop" );
729     var_CreateGetBool( p_playlist, "play-and-exit" );
730     var_CreateGetBool( p_playlist, "random" );
731     var_CreateGetBool( p_playlist, "repeat" );
732     var_CreateGetBool( p_playlist, "loop" );
733
734     var_AddCallback( p_playlist, "random", RandomCallback, NULL );
735 }