git.sesse.net Git - vlc/blob - src/playlist/engine.c

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