]> git.sesse.net Git - vlc/blobdiff - src/modules/modules.c
Merge module_release and module_Put
[vlc] / src / modules / modules.c
index b60f9cb8faa3c9d8a185edeb1a1660eb166d1614..c73c97d696d7ad08b7664d0c0c885400df978c89 100644 (file)
@@ -28,7 +28,8 @@
 # include "config.h"
 #endif
 
-#include <vlc/vlc.h>
+#include <vlc_common.h>
+#include <vlc_plugin.h>
 #include "libvlc.h"
 
 /* Some faulty libcs have a broken struct dirent when _FILE_OFFSET_BITS
 #include "config/configuration.h"
 
 #include "vlc_charset.h"
+#include "vlc_arrays.h"
 
 #include "modules/modules.h"
 #include "modules/builtin.h"
 
+module_bank_t *p_module_bank;
+
 /*****************************************************************************
  * Local prototypes
  *****************************************************************************/
@@ -98,14 +102,12 @@ static int  AllocatePluginFile  ( vlc_object_t *, char *, int64_t, int64_t );
 static module_t * AllocatePlugin( vlc_object_t *, char * );
 #endif
 static int  AllocateBuiltinModule( vlc_object_t *, int ( * ) ( module_t * ) );
-static int  DeleteModule ( module_t *, vlc_bool_t );
+static void DeleteModule ( module_t *, bool );
 #ifdef HAVE_DYNAMIC_PLUGINS
 static void   DupModule        ( module_t * );
 static void   UndupModule      ( module_t * );
 #endif
 
-static void module_LoadMain( vlc_object_t *p_this );
-
 /**
  * Init bank
  *
@@ -117,37 +119,34 @@ static void module_LoadMain( vlc_object_t *p_this );
 void __module_InitBank( vlc_object_t *p_this )
 {
     module_bank_t *p_bank = NULL;
-    vlc_value_t  lockval;
-    libvlc_global_data_t *p_libvlc_global = vlc_global();
 
-    var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
-    var_Get( p_libvlc_global, "libvlc", &lockval );
-    vlc_mutex_lock( lockval.p_address );
-    if( p_libvlc_global->p_module_bank )
+    vlc_mutex_t *lock = var_AcquireMutex( "libvlc" );
+
+    if( p_module_bank == NULL )
     {
-        p_libvlc_global->p_module_bank->i_usage++;
-        vlc_mutex_unlock( lockval.p_address );
-        var_Destroy( p_libvlc_global, "libvlc" );
-        return;
+        p_bank = vlc_custom_create( p_this, sizeof(module_bank_t),
+                                    VLC_OBJECT_GENERIC, "module bank");
+        p_bank->i_usage = 1;
+        p_bank->i_cache = p_bank->i_loaded_cache = 0;
+        p_bank->pp_cache = p_bank->pp_loaded_cache = NULL;
+        p_bank->b_cache = p_bank->b_cache_dirty =
+        p_bank->b_cache_delete = false;
+        p_bank->head = NULL;
+
+        /* Everything worked, attach the object */
+        p_module_bank = p_bank;
+
+        /* Fills the module bank structure with the main module infos.
+         * This is very useful as it will allow us to consider the main
+         * library just as another module, and for instance the configuration
+         * options of main will be available in the module bank structure just
+         * as for every other module. */
+        AllocateBuiltinModule( p_this, vlc_entry__main );
     }
-    vlc_mutex_unlock( lockval.p_address );
-    var_Destroy( p_libvlc_global, "libvlc" );
+    else
+        p_module_bank->i_usage++;
 
-    p_bank = vlc_object_create( p_this, sizeof(module_bank_t) );
-    if( !p_bank )
-        return;
-    p_bank->psz_object_name = "module bank";
-    p_bank->i_usage = 1;
-    p_bank->i_cache = p_bank->i_loaded_cache = 0;
-    p_bank->pp_cache = p_bank->pp_loaded_cache = NULL;
-    p_bank->b_cache = p_bank->b_cache_dirty =
-        p_bank->b_cache_delete = VLC_FALSE;
-
-    /* Everything worked, attach the object */
-    p_libvlc_global->p_module_bank = p_bank;
-    vlc_object_attach( p_bank, p_libvlc_global );
-
-    module_LoadMain( p_this );
+    vlc_mutex_unlock( lock );
 }
 
 
@@ -162,32 +161,25 @@ void __module_InitBank( vlc_object_t *p_this )
 void __module_EndBank( vlc_object_t *p_this )
 {
     module_t * p_next = NULL;
-    vlc_value_t lockval;
-    libvlc_global_data_t *p_libvlc_global = vlc_global();
 
-    var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
-    var_Get( p_libvlc_global, "libvlc", &lockval );
-    vlc_mutex_lock( lockval.p_address );
-    if( !p_libvlc_global->p_module_bank )
+    vlc_mutex_t *lock = var_AcquireMutex( "libvlc" );
+    if( !p_module_bank )
     {
-        vlc_mutex_unlock( lockval.p_address );
-        var_Destroy( p_libvlc_global, "libvlc" );
+        vlc_mutex_unlock( lock );
         return;
     }
-    if( --p_libvlc_global->p_module_bank->i_usage )
+    if( --p_module_bank->i_usage )
     {
-        vlc_mutex_unlock( lockval.p_address );
-        var_Destroy( p_libvlc_global, "libvlc" );
+        vlc_mutex_unlock( lock );
         return;
     }
-    vlc_mutex_unlock( lockval.p_address );
-    var_Destroy( p_libvlc_global, "libvlc" );
+    vlc_mutex_unlock( lock );
 
     /* Save the configuration */
     config_AutoSaveConfigFile( p_this );
 
 #ifdef HAVE_DYNAMIC_PLUGINS
-# define p_bank p_libvlc_global->p_module_bank
+# define p_bank p_module_bank
     if( p_bank->b_cache ) CacheSave( p_this );
     while( p_bank->i_loaded_cache-- )
     {
@@ -220,57 +212,14 @@ void __module_EndBank( vlc_object_t *p_this )
 # undef p_bank
 #endif
 
-    vlc_object_detach( p_libvlc_global->p_module_bank );
-
-    while( p_libvlc_global->p_module_bank->i_children )
+    while( vlc_internals( p_module_bank )->i_children )
     {
-        p_next = (module_t *)p_libvlc_global->p_module_bank->pp_children[0];
-
-        if( DeleteModule( p_next, VLC_TRUE ) )
-        {
-            /* Module deletion failed */
-            msg_Err( p_this, "module \"%s\" can't be removed, trying harder",
-                     p_next->psz_object_name );
-
-            /* We just free the module by hand. Niahahahahaha. */
-            vlc_object_detach( p_next );
-            vlc_object_release( p_next );
-        }
+        p_next = (module_t *)vlc_internals( p_module_bank )->pp_children[0];
+        DeleteModule( p_next, true );
     }
 
-    vlc_object_release( p_libvlc_global->p_module_bank );
-    p_libvlc_global->p_module_bank = NULL;
-}
-
-/**
- * Load the main program info into the module bank.
- *
- * Fills the module bank structure with the main module infos.
- * This is very useful as it will allow us to consider the main program just
- * as another module, and for instance the configuration options of main will
- * be available in the module bank structure just as for every other module.
- * \param p_this vlc object structure
- * \return nothing
- */
-static void module_LoadMain( vlc_object_t *p_this )
-{
-    vlc_value_t lockval;
-    libvlc_global_data_t *p_libvlc_global = vlc_global();
-
-    var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
-    var_Get( p_libvlc_global, "libvlc", &lockval );
-    vlc_mutex_lock( lockval.p_address );
-    if( p_libvlc_global->p_module_bank->b_main )
-    {
-        vlc_mutex_unlock( lockval.p_address );
-        var_Destroy( p_libvlc_global, "libvlc" );
-        return;
-    }
-    p_libvlc_global->p_module_bank->b_main = VLC_TRUE;
-    vlc_mutex_unlock( lockval.p_address );
-    var_Destroy( p_libvlc_global, "libvlc" );
-
-    AllocateBuiltinModule( p_this, vlc_entry__main );
+    vlc_object_release( p_module_bank );
+    p_module_bank = NULL;
 }
 
 /**
@@ -282,21 +231,14 @@ static void module_LoadMain( vlc_object_t *p_this )
  */
 void __module_LoadBuiltins( vlc_object_t * p_this )
 {
-    vlc_value_t lockval;
-    libvlc_global_data_t *p_libvlc_global = vlc_global();
-
-    var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
-    var_Get( p_libvlc_global, "libvlc", &lockval );
-    vlc_mutex_lock( lockval.p_address );
-    if( p_libvlc_global->p_module_bank->b_builtins )
+    vlc_mutex_t *lock = var_AcquireMutex( "libvlc" );
+    if( p_module_bank->b_builtins )
     {
-        vlc_mutex_unlock( lockval.p_address );
-        var_Destroy( p_libvlc_global, "libvlc" );
+        vlc_mutex_unlock( lock );
         return;
     }
-    p_libvlc_global->p_module_bank->b_builtins = VLC_TRUE;
-    vlc_mutex_unlock( lockval.p_address );
-    var_Destroy( p_libvlc_global, "libvlc" );
+    p_module_bank->b_builtins = true;
+    vlc_mutex_unlock( lock );
 
     msg_Dbg( p_this, "checking builtin modules" );
     ALLOCATE_ALL_BUILTINS();
@@ -313,29 +255,22 @@ void __module_LoadBuiltins( vlc_object_t * p_this )
 void __module_LoadPlugins( vlc_object_t * p_this )
 {
 #ifdef HAVE_DYNAMIC_PLUGINS
-    vlc_value_t lockval;
-    libvlc_global_data_t *p_libvlc_global = vlc_global();
-
-    var_Create( p_libvlc_global, "libvlc", VLC_VAR_MUTEX );
-    var_Get( p_libvlc_global, "libvlc", &lockval );
-    vlc_mutex_lock( lockval.p_address );
-    if( p_libvlc_global->p_module_bank->b_plugins )
+    vlc_mutex_t *lock = var_AcquireMutex( "libvlc" );
+    if( p_module_bank->b_plugins )
     {
-        vlc_mutex_unlock( lockval.p_address );
-        var_Destroy( p_libvlc_global, "libvlc" );
+        vlc_mutex_unlock( lock );
         return;
     }
-    p_libvlc_global->p_module_bank->b_plugins = VLC_TRUE;
-    vlc_mutex_unlock( lockval.p_address );
-    var_Destroy( p_libvlc_global, "libvlc" );
+    p_module_bank->b_plugins = true;
+    vlc_mutex_unlock( lock );
 
     msg_Dbg( p_this, "checking plugin modules" );
 
     if( config_GetInt( p_this, "plugins-cache" ) )
-        p_libvlc_global->p_module_bank->b_cache = VLC_TRUE;
+        p_module_bank->b_cache = true;
 
-    if( p_libvlc_global->p_module_bank->b_cache ||
-        p_libvlc_global->p_module_bank->b_cache_delete ) CacheLoad( p_this );
+    if( p_module_bank->b_cache ||
+        p_module_bank->b_cache_delete ) CacheLoad( p_this );
 
     AllocateAllPlugins( p_this );
 #endif
@@ -348,7 +283,7 @@ void __module_LoadPlugins( vlc_object_t * p_this )
  * \param cap the capability to check
  * \return TRUE if the module have the capability
  */
-vlc_bool_t module_IsCapable( const module_t *m, const char *cap )
+bool module_IsCapable( const module_t *m, const char *cap )
 {
     return !strcmp( m->psz_capability, cap );
 }
@@ -371,7 +306,7 @@ const char *module_GetObjName( const module_t *m )
  * \param long_name TRUE to have the long name of the module
  * \return the short or long name of the module
  */
-const char *module_GetName( const module_t *m, vlc_bool_t long_name )
+const char *module_GetName( const module_t *m, bool long_name )
 {
     if( long_name && ( m->psz_longname != NULL) )
         return m->psz_longname;
@@ -390,10 +325,77 @@ const char *module_GetHelp( const module_t *m )
     return m->psz_help;
 }
 
+module_t *module_hold (module_t *m)
+{
+    vlc_hold (&m->vlc_gc_data);
+    return m;
+}
+
+void module_release (module_t *m)
+{
+    vlc_release (&m->vlc_gc_data);
+}
+
+/**
+ * Frees the flat list of VLC modules.
+ * @param list list obtained by module_list_get
+ * @param length number of items on the list
+ * @return nothing.
+ */
+void module_list_free (module_t **list)
+{
+    if (list == NULL)
+        return;
+
+    for (size_t i = 0; list[i] != NULL; i++)
+         module_release (list[i]);
+    free (list);
+}
+
+/**
+ * Gets the flat list of VLC modules.
+ * @param n [OUT] pointer to the number of modules or NULL
+ * @return NULL-terminated table of module pointers
+ *         (release with module_list_free()), or NULL in case of error.
+ */
+module_t **module_list_get (size_t *n)
+{
+    /* TODO: this whole module lookup is quite inefficient */
+    /* Remove this and improve module_Need */
+    module_t **tab = NULL;
+    size_t i = 0;
+
+    for (module_t *mod = p_module_bank->head; mod; mod = mod->next)
+    {
+         module_t **nt;
+         nt  = realloc (tab, (i + 2 + mod->submodule_count) * sizeof (*tab));
+         if (nt == NULL)
+         {
+             module_list_free (tab);
+             return NULL;
+         }
+
+         tab = nt;
+         tab[i++] = module_hold (mod);
+         for (module_t *subm = mod->submodule; subm; subm = subm->next)
+             tab[i++] = module_hold (subm);
+         tab[i] = NULL;
+    }
+    if (n != NULL)
+        *n = i;
+    return tab;
+}
+
 /**
  * module Need
  *
  * Return the best module function, given a capability list.
+ *
+ * If the p_this object doesn't have it's psz_object_name set, then
+ * psz_object_name will be set to the module's name, unless the user
+ * provided an alias using the "module name@alias" syntax in which case
+ * psz_object_name will be set to the alias.
+ *
  * \param p_this the vlc object
  * \param psz_capability list of capabilities needed
  * \param psz_name name of the module asked
@@ -401,20 +403,21 @@ const char *module_GetHelp( const module_t *m )
  * \return the module or NULL in case of a failure
  */
 module_t * __module_Need( vlc_object_t *p_this, const char *psz_capability,
-                          const char *psz_name, vlc_bool_t b_strict )
+                          const char *psz_name, bool b_strict )
 {
     typedef struct module_list_t module_list_t;
 
+    stats_TimerStart( p_this, "module_Need()", STATS_TIMER_MODULE_NEED );
+
     struct module_list_t
     {
         module_t *p_module;
         int i_score;
-        vlc_bool_t b_force;
+        bool b_force;
         module_list_t *p_next;
     };
 
     module_list_t *p_list, *p_first, *p_tmp;
-    vlc_list_t *p_all;
 
     int i_which_module, i_index = 0;
 
@@ -422,17 +425,13 @@ module_t * __module_Need( vlc_object_t *p_this, const char *psz_capability,
 
     int   i_shortcuts = 0;
     char *psz_shortcuts = NULL, *psz_var = NULL, *psz_alias = NULL;
-    vlc_bool_t b_force_backup = p_this->b_force;
+    bool b_force_backup = p_this->b_force;
 
 
     /* Deal with variables */
     if( psz_name && psz_name[0] == '$' )
     {
-        vlc_value_t val;
-        var_Create( p_this, psz_name + 1, VLC_VAR_MODULE | VLC_VAR_DOINHERIT );
-        var_Get( p_this, psz_name + 1, &val );
-        psz_var = val.psz_string;
-        psz_name = psz_var;
+        psz_name = psz_var = var_CreateGetString( p_this, psz_name + 1 );
     }
 
     /* Count how many different shortcuts were asked for */
@@ -444,6 +443,9 @@ module_t * __module_Need( vlc_object_t *p_this, const char *psz_capability,
         if( !strcmp( psz_name, "none" ) )
         {
             free( psz_var );
+            stats_TimerStop( p_this, STATS_TIMER_MODULE_NEED );
+            stats_TimerDump( p_this, STATS_TIMER_MODULE_NEED );
+            stats_TimerClean( p_this, STATS_TIMER_MODULE_NEED );
             return NULL;
         }
 
@@ -465,29 +467,29 @@ module_t * __module_Need( vlc_object_t *p_this, const char *psz_capability,
         {
             if( !strcmp(psz_last_shortcut, "none") )
             {
-                b_strict = VLC_TRUE;
+                b_strict = true;
                 i_shortcuts--;
             }
             else if( !strcmp(psz_last_shortcut, "any") )
             {
-                b_strict = VLC_FALSE;
+                b_strict = false;
                 i_shortcuts--;
             }
         }
     }
 
     /* Sort the modules and test them */
-    p_all = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
-    p_list = malloc( p_all->i_count * sizeof( module_list_t ) );
+    size_t count;
+    module_t **p_all = module_list_get (&count);
+    p_list = malloc( count * sizeof( module_list_t ) );
     p_first = NULL;
     unsigned i_cpu = vlc_CPU();
 
     /* Parse the module list for capabilities and probe each of them */
-    for( i_which_module = 0; i_which_module < p_all->i_count; i_which_module++ )
+    for( i_which_module = 0; i_which_module < count; i_which_module++ )
     {
         int i_shortcut_bonus = 0;
-
-        p_module = (module_t *)p_all->p_values[i_which_module].p_object;
+        p_module = p_all[i_which_module];
 
         /* Test that this module can do what we need */
         if( !module_IsCapable( p_module, psz_capability ) )
@@ -506,7 +508,7 @@ module_t * __module_Need( vlc_object_t *p_this, const char *psz_capability,
         /* If we required a shortcut, check this plugin provides it. */
         if( i_shortcuts > 0 )
         {
-            vlc_bool_t b_trash;
+            bool b_trash;
             const char *psz_name = psz_shortcuts;
 
             /* Let's drop modules with a <= 0 score (unless they are
@@ -595,12 +597,12 @@ found_shortcut:
     p_tmp = p_first;
     while( p_tmp != NULL )
     {
-        vlc_object_yield( p_tmp->p_module );
+        module_hold( p_tmp->p_module );
         p_tmp = p_tmp->p_next;
     }
 
-    /* We can release the list, interesting modules were yielded */
-    vlc_list_release( p_all );
+    /* We can release the list, interesting modules were held */
+    module_list_free (p_all);
 
     /* Parse the linked list and use the first successful module */
     p_tmp = p_first;
@@ -610,7 +612,7 @@ found_shortcut:
         /* Make sure the module is loaded in mem */
         module_t *p_module = p_tmp->p_module;
         if( p_module->b_submodule )
-            p_module = (module_t *)p_module->p_parent;
+            p_module = p_module->parent;
 
         if( !p_module->b_builtin && !p_module->b_loaded )
         {
@@ -619,8 +621,7 @@ found_shortcut:
             if( p_new_module )
             {
                 CacheMerge( p_this, p_module, p_new_module );
-                vlc_object_attach( p_new_module, p_module );
-                DeleteModule( p_new_module, VLC_TRUE );
+                DeleteModule( p_new_module, false );
             }
         }
 #endif
@@ -632,7 +633,7 @@ found_shortcut:
             break;
         }
 
-        vlc_object_release( p_tmp->p_module );
+        module_release( p_tmp->p_module );
         p_tmp = p_tmp->p_next;
     }
 
@@ -650,7 +651,7 @@ found_shortcut:
     /* Unlock the remaining modules */
     while( p_tmp != NULL )
     {
-        vlc_object_release( p_tmp->p_module );
+        module_release( p_tmp->p_module );
         p_tmp = p_tmp->p_next;
     }
 
@@ -691,12 +692,19 @@ found_shortcut:
         /* This assumes that p_this is the object which will be using the
          * module. That's not always the case ... but it is in most cases.
          */
-        p_this->psz_object_name = p_module->psz_object_name;
+        if( psz_alias )
+            p_this->psz_object_name = strdup( psz_alias );
+        else
+            p_this->psz_object_name = strdup( p_module->psz_object_name );
     }
 
     free( psz_shortcuts );
     free( psz_var );
 
+    stats_TimerStop( p_this, STATS_TIMER_MODULE_NEED );
+    stats_TimerDump( p_this, STATS_TIMER_MODULE_NEED );
+    stats_TimerClean( p_this, STATS_TIMER_MODULE_NEED );
+
     /* Don't forget that the module is still locked */
     return p_module;
 }
@@ -720,9 +728,7 @@ void __module_Unneed( vlc_object_t * p_this, module_t * p_module )
 
     msg_Dbg( p_this, "removing module \"%s\"", p_module->psz_object_name );
 
-    vlc_object_release( p_module );
-
-    return;
+    module_release( p_module );
 }
 
 /**
@@ -734,38 +740,26 @@ void __module_Unneed( vlc_object_t * p_this, module_t * p_module )
  */
 module_t *__module_Find( vlc_object_t *p_this, const char * psz_name )
 {
-    vlc_list_t *p_list;
-    int i;
-    p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
-    for( i = 0 ; i < p_list->i_count; i++)
+    module_t **list, *module;
+
+    list = module_list_get (NULL);
+    if (!list)
+        return NULL;
+
+    for (size_t i = 0; (module = list[i]) != NULL; i++)
     {
-        module_t *p_module = ((module_t *) p_list->p_values[i].p_object);
-        const char *psz_module_name = p_module->psz_object_name;
+        const char *psz_module_name = module->psz_object_name;
+
         if( psz_module_name && !strcmp( psz_module_name, psz_name ) )
         {
-            /* We can release the list, and return yes */
-            vlc_object_yield( p_module );
-            vlc_list_release( p_list );
-            return p_module;
+            module_hold (module);
+            break;
         }
     }
-    vlc_list_release( p_list );
-    return NULL;
+    module_list_free (list);
+    return module;
 }
 
-
-/**
- * Release a module_t pointer from module_Find().
- *
- * \param module the module to release
- * \return nothing
- */
-void module_Put( module_t *module )
-{
-    vlc_object_release( module );
-}
-
-
 /**
  * Tell if a module exists and release it in thic case
  *
@@ -773,18 +767,12 @@ void module_Put( module_t *module )
  * \param psz_name th name of the module
  * \return TRUE if the module exists
  */
-vlc_bool_t __module_Exists( vlc_object_t *p_this, const char * psz_name )
+bool __module_Exists( vlc_object_t *p_this, const char * psz_name )
 {
     module_t *p_module = __module_Find( p_this, psz_name );
     if( p_module )
-    {
-        module_Put( p_module );
-        return VLC_TRUE;
-    }
-    else
-    {
-        return VLC_FALSE;
-    }
+        module_release (p_module);
+    return true != NULL;
 }
 
 /**
@@ -803,16 +791,17 @@ char ** __module_GetModulesNamesForCapability( vlc_object_t *p_this,
                                                const char *psz_capability,
                                                char ***pppsz_longname )
 {
-    vlc_list_t *p_list;
-    int i, j, count = 0;
+    size_t count = 0;
     char **psz_ret;
 
+    module_t **list = module_list_get (NULL);
+
     /* Do it in two passes : count the number of modules before */
-    p_list = vlc_list_find( p_this, VLC_OBJECT_MODULE, FIND_ANYWHERE );
-    for( i = 0 ; i < p_list->i_count; i++)
+    for (size_t i = 0; list[i]; i++)
     {
-        module_t *p_module = ((module_t *) p_list->p_values[i].p_object);
+        module_t *p_module = list[i];
         const char *psz_module_capability = p_module->psz_capability;
+
         if( psz_module_capability && !strcmp( psz_module_capability, psz_capability ) )
             count++;
     }
@@ -825,15 +814,15 @@ char ** __module_GetModulesNamesForCapability( vlc_object_t *p_this,
         free( psz_ret );
         free( *pppsz_longname );
         *pppsz_longname = NULL;
-        vlc_list_release( p_list );
+        module_list_free (list);
         return NULL;
     }
 
-    j = 0;
-    for( i = 0 ; i < p_list->i_count; i++)
+    for (size_t i = 0, j = 0; list[i]; i++)
     {
-        module_t *p_module = ((module_t *) p_list->p_values[i].p_object);
+        module_t *p_module = list[i];
         const char *psz_module_capability = p_module->psz_capability;
+
         if( psz_module_capability && !strcmp( psz_module_capability, psz_capability ) )
         {
             int k = -1; /* hack to handle submodules properly */
@@ -845,13 +834,13 @@ char ** __module_GetModulesNamesForCapability( vlc_object_t *p_this,
             psz_ret[j] = strdup( k>=0?p_module->pp_shortcuts[k]
                                      :p_module->psz_object_name );
             if( pppsz_longname )
-                (*pppsz_longname)[j] = strdup( module_GetName( p_module, VLC_TRUE ) );
+                (*pppsz_longname)[j] = strdup( module_GetName( p_module, true ) );
             j++;
         }
     }
     psz_ret[count] = NULL;
 
-    vlc_list_release( p_list );
+    module_list_free (list);
 
     return psz_ret;
 }
@@ -913,30 +902,37 @@ void module_PutConfig( module_config_t *config )
 static char * copy_next_paths_token( char * paths, char ** remaining_paths )
 {
     char * path;
-    int i;
+    int i, done;
     bool escaped = false;
 
     assert( paths );
 
     /* Alloc a buffer to store the path */
-    path = malloc( strlen( paths ) );
+    path = malloc( strlen( paths ) + 1 );
     if( !path ) return NULL;
 
     /* Look for PATH_SEP_CHAR (a ':' or a ';') */
-    for( i = 0; paths[i]; i++ ) {
+    for( i = 0, done = 0 ; paths[i]; i++ )
+    {
         /* Take care of \\ and \: or \; escapement */
-        if( escaped ) {
+        if( escaped )
+        {
             escaped = false;
-            path[i] = paths[i];
+            path[done++] = paths[i];
         }
+#ifdef WIN32
+        else if( paths[i] == '/' )
+            escaped = true;
+#else
         else if( paths[i] == '\\' )
             escaped = true;
+#endif
         else if( paths[i] == PATH_SEP_CHAR )
             break;
         else
-            path[i] = paths[i];
+            path[done++] = paths[i];
     }
-    path[i] = 0;
+    path[done++] = 0;
 
     /* Return the remaining paths */
     if( remaining_paths ) {
@@ -952,72 +948,50 @@ static char * copy_next_paths_token( char * paths, char ** remaining_paths )
 #ifdef HAVE_DYNAMIC_PLUGINS
 static void AllocateAllPlugins( vlc_object_t *p_this )
 {
-    char *paths, *path, *paths_iter;
+    const char *vlcpath = vlc_global()->psz_vlcpath;
+    int count,i;
+    char * path;
+    vlc_array_t *arraypaths = vlc_array_new();
 
-#if defined( WIN32 ) || defined( UNDER_CE )
-    const char * extra_path = NULL;
-#else
-    const char * extra_path = PLUGIN_PATH;
+    /* Contruct the special search path for system that have a relocatable
+     * executable. Set it to <vlc path>/modules and <vlc path>/plugins. */
+
+    if( vlcpath && asprintf( &path, "%s" DIR_SEP "modules", vlcpath ) != -1 )
+        vlc_array_append( arraypaths, path );
+    if( vlcpath && asprintf( &path, "%s" DIR_SEP "plugins", vlcpath ) != -1 )
+        vlc_array_append( arraypaths, path );
+#ifndef WIN32
+    vlc_array_append( arraypaths, strdup( PLUGIN_PATH ) );
 #endif
 
     /* If the user provided a plugin path, we add it to the list */
-    char * userpaths = config_GetPsz( p_this, "plugin-path" );
+    char *userpaths = config_GetPsz( p_this, "plugin-path" );
+    char *paths_iter;
 
-    if( asprintf( &paths, "modules%s%s"PATH_SEP"plugins%s%s",
-                    extra_path ? PATH_SEP : "",
-                    extra_path ? extra_path : "",
-                    userpaths ? PATH_SEP : "",
-                    userpaths ? userpaths : "" ) < 0 )
+    for( paths_iter = userpaths; paths_iter; )
     {
-        msg_Err( p_this, "Not enough memory" );
-        free( userpaths );
-        return;
+        path = copy_next_paths_token( paths_iter, &paths_iter );
+        if( path )
+            vlc_array_append( arraypaths, path );
     }
 
-    /* Free plugin-path */
-    free( userpaths );
-
-    for( paths_iter = paths; paths_iter; )
+    count = vlc_array_count( arraypaths );
+    for( i = 0 ; i < count ; i++ )
     {
-        char *psz_fullpath;
-
-        path = copy_next_paths_token( paths_iter, &paths_iter );
+        path = vlc_array_item_at_index( arraypaths, i );
         if( !path )
-        {
-            msg_Err( p_this, "Not enough memory" );
-            return;
-        }
-
-#if defined( SYS_BEOS ) || defined( __APPLE__ ) || defined( WIN32 )
-
-        /* Handle relative as well as absolute paths */
-#ifdef WIN32
-        if( path[0] != '\\' && path[0] != '/' && path[0] != ':' )
-#else
-        if( path[0] != '/' )
-#endif
-        {
-            if( 0>= asprintf( &psz_fullpath, "%s"DIR_SEP"%s",
-                              vlc_global()->psz_vlcpath, path) )
-                psz_fullpath = NULL;
-        }
-        else
-#endif
-            psz_fullpath = strdup( path );
-
-        if( psz_fullpath == NULL )
             continue;
 
-        msg_Dbg( p_this, "recursively browsing `%s'", psz_fullpath );
+        msg_Dbg( p_this, "recursively browsing `%s'", path );
 
         /* Don't go deeper than 5 subdirectories */
-        AllocatePluginDir( p_this, psz_fullpath, 5 );
+        AllocatePluginDir( p_this, path, 5 );
 
-        free( psz_fullpath );
         free( path );
     }
 
-    free( paths );
+    vlc_array_destroy( arraypaths );
+    free( userpaths );
 }
 
 /*****************************************************************************
@@ -1235,7 +1209,7 @@ static int AllocatePluginFile( vlc_object_t * p_this, char * psz_file,
             module_config_t *p_item = NULL, *p_end = NULL;
 
             p_module = p_cache_entry->p_module;
-            p_module->b_loaded = VLC_FALSE;
+            p_module->b_loaded = false;
 
             /* For now we force loading if the module's config contains
              * callbacks or actions.
@@ -1250,27 +1224,25 @@ static int AllocatePluginFile( vlc_object_t * p_this, char * psz_file,
                 }
             }
             if( p_module == p_cache_entry->p_module )
-                p_cache_entry->b_used = VLC_TRUE;
+                p_cache_entry->b_used = true;
         }
     }
 
     if( p_module )
     {
-        libvlc_global_data_t *p_libvlc_global = vlc_global();
-
         /* Everything worked fine !
          * The module is ready to be added to the list. */
-        p_module->b_builtin = VLC_FALSE;
+        p_module->b_builtin = false;
 
         /* msg_Dbg( p_this, "plugin \"%s\", %s",
                     p_module->psz_object_name, p_module->psz_longname ); */
+        p_module->next = p_module_bank->head;
+        p_module_bank->head = p_module;
 
-        vlc_object_attach( p_module, p_libvlc_global->p_module_bank );
-
-        if( !p_libvlc_global->p_module_bank->b_cache )
+        if( !p_module_bank->b_cache )
             return 0;
 
-#define p_bank p_libvlc_global->p_module_bank
+#define p_bank p_module_bank
         /* Add entry to cache */
         p_bank->pp_cache =
             realloc( p_bank->pp_cache, (p_bank->i_cache + 1) * sizeof(void *) );
@@ -1281,9 +1253,10 @@ static int AllocatePluginFile( vlc_object_t * p_this, char * psz_file,
         p_bank->pp_cache[p_bank->i_cache]->i_time = i_file_time;
         p_bank->pp_cache[p_bank->i_cache]->i_size = i_file_size;
         p_bank->pp_cache[p_bank->i_cache]->b_junk = p_module ? 0 : 1;
-        p_bank->pp_cache[p_bank->i_cache]->b_used = VLC_TRUE;
+        p_bank->pp_cache[p_bank->i_cache]->b_used = true;
         p_bank->pp_cache[p_bank->i_cache]->p_module = p_module;
         p_bank->i_cache++;
+#undef p_bank
     }
 
     return p_module ? 0 : -1;
@@ -1309,7 +1282,6 @@ static module_t * AllocatePlugin( vlc_object_t * p_this, char * psz_file )
     p_module = vlc_module_create( p_this );
     if( p_module == NULL )
     {
-        msg_Err( p_this, "out of memory" );
         module_Unload( handle );
         return NULL;
     }
@@ -1317,13 +1289,13 @@ static module_t * AllocatePlugin( vlc_object_t * p_this, char * psz_file )
     /* We need to fill these since they may be needed by module_Call() */
     p_module->psz_filename = psz_file;
     p_module->handle = handle;
-    p_module->b_loaded = VLC_TRUE;
+    p_module->b_loaded = true;
 
     /* Initialize the module: fill p_module, default config */
-    if( module_Call( p_module ) != 0 )
+    if( module_Call( p_this, p_module ) != 0 )
     {
         /* We couldn't call module_init() */
-        vlc_object_release( p_module );
+        module_release( p_module );
         module_Unload( handle );
         return NULL;
     }
@@ -1332,7 +1304,7 @@ static module_t * AllocatePlugin( vlc_object_t * p_this, char * psz_file )
     p_module->psz_filename = strdup( p_module->psz_filename );
 
     /* Everything worked fine ! The module is ready to be added to the list. */
-    p_module->b_builtin = VLC_FALSE;
+    p_module->b_builtin = false;
 
     return p_module;
 }
@@ -1345,8 +1317,7 @@ static module_t * AllocatePlugin( vlc_object_t * p_this, char * psz_file )
  *****************************************************************************/
 static void DupModule( module_t *p_module )
 {
-    const char **pp_shortcut;
-    int i_submodule;
+    char **pp_shortcut;
 
     for( pp_shortcut = p_module->pp_shortcuts ; *pp_shortcut ; pp_shortcut++ )
     {
@@ -1355,7 +1326,6 @@ static void DupModule( module_t *p_module )
 
     /* We strdup() these entries so that they are still valid when the
      * module is unloaded. */
-    p_module->psz_object_name = strdup( p_module->psz_object_name );
     p_module->psz_capability = strdup( p_module->psz_capability );
     p_module->psz_shortname = p_module->psz_shortname ?
                                  strdup( p_module->psz_shortname ) : NULL;
@@ -1363,10 +1333,8 @@ static void DupModule( module_t *p_module )
     p_module->psz_help = p_module->psz_help ? strdup( p_module->psz_help )
                                             : NULL;
 
-    for( i_submodule = 0; i_submodule < p_module->i_children; i_submodule++ )
-    {
-        DupModule( (module_t*)p_module->pp_children[ i_submodule ] );
-    }
+    for (module_t *subm = p_module->submodule; subm; subm = subm->next)
+        DupModule (subm);
 }
 
 /*****************************************************************************
@@ -1376,24 +1344,21 @@ static void DupModule( module_t *p_module )
  *****************************************************************************/
 static void UndupModule( module_t *p_module )
 {
-    const char **pp_shortcut;
-    int i_submodule;
+    char **pp_shortcut;
 
-    for( i_submodule = 0; i_submodule < p_module->i_children; i_submodule++ )
-    {
-        UndupModule( (module_t*)p_module->pp_children[ i_submodule ] );
-    }
+    for (module_t *subm = p_module->submodule; subm; subm = subm->next)
+        UndupModule (subm);
 
     for( pp_shortcut = p_module->pp_shortcuts ; *pp_shortcut ; pp_shortcut++ )
     {
-        free( (void*)*pp_shortcut );
+        free( *pp_shortcut );
     }
 
-    free( (void*)p_module->psz_object_name );
+    FREENULL( p_module->psz_object_name );
     free( p_module->psz_capability );
-    free( (void*)p_module->psz_shortname );
-    free( (void*)p_module->psz_longname );
-    free( (void*)p_module->psz_help );
+    free( p_module->psz_shortname );
+    free( p_module->psz_longname );
+    free( p_module->psz_help );
 }
 
 #endif /* HAVE_DYNAMIC_PLUGINS */
@@ -1414,10 +1379,7 @@ static int AllocateBuiltinModule( vlc_object_t * p_this,
      * allocate a structure for it */
     p_module = vlc_module_create( p_this );
     if( p_module == NULL )
-    {
-        msg_Err( p_this, "out of memory" );
         return -1;
-    }
 
     /* Initialize the module : fill p_module->psz_object_name, etc. */
     if( pf_entry( p_module ) != 0 )
@@ -1425,18 +1387,20 @@ static int AllocateBuiltinModule( vlc_object_t * p_this,
         /* With a well-written module we shouldn't have to print an
          * additional error message here, but just make sure. */
         msg_Err( p_this, "failed calling entry point in builtin module" );
-        vlc_object_release( p_module );
+        module_release( p_module );
         return -1;
     }
 
     /* Everything worked fine ! The module is ready to be added to the list. */
-    p_module->b_builtin = VLC_TRUE;
+    p_module->b_builtin = true;
+    /* LOCK */
+    p_module->next = p_module_bank->head;
+    p_module_bank->head = p_module;
+    /* UNLOCK */
 
     /* msg_Dbg( p_this, "builtin \"%s\", %s",
                 p_module->psz_object_name, p_module->psz_longname ); */
 
-    vlc_object_attach( p_module, vlc_global()->p_module_bank );
-
     return 0;
 }
 
@@ -1445,11 +1409,9 @@ static int AllocateBuiltinModule( vlc_object_t * p_this,
  *****************************************************************************
  * This function can only be called if the module isn't being used.
  *****************************************************************************/
-static int DeleteModule( module_t * p_module, vlc_bool_t b_detach )
+static void DeleteModule( module_t * p_module, bool b_detach )
 {
-    if( !p_module ) return VLC_EGENERIC;
-    if( b_detach )
-        vlc_object_detach( p_module );
+    assert( p_module );
 
     /* We free the structures that we strdup()ed in Allocate*Module(). */
 #ifdef HAVE_DYNAMIC_PLUGINS
@@ -1465,15 +1427,13 @@ static int DeleteModule( module_t * p_module, vlc_bool_t b_detach )
 #endif
 
     /* Free and detach the object's children */
-    while( p_module->i_children )
+    while (p_module->submodule)
     {
-        vlc_object_t *p_this = p_module->pp_children[0];
-        vlc_object_detach( p_this );
-        vlc_object_release( p_this );
+        module_t *submodule = p_module->submodule;
+        p_module->submodule = submodule->next;
+        module_release (submodule);
     }
 
     config_Free( p_module );
-    vlc_object_release( p_module );
-    p_module = NULL;
-    return 0;
+    module_release( p_module );
 }