2 * QEMU Module Infrastructure
4 * Copyright IBM, Corp. 2009
7 * Anthony Liguori <aliguori@us.ibm.com>
9 * This work is licensed under the terms of the GNU GPL, version 2. See
10 * the COPYING file in the top-level directory.
12 * Contributions after 2012-01-13 are licensed under the terms of the
13 * GNU GPL, version 2 or (at your option) any later version.
16 #include "qemu/osdep.h"
17 #include "qemu-common.h"
21 #include "qemu/queue.h"
22 #include "qemu/module.h"
24 typedef struct ModuleEntry
27 QTAILQ_ENTRY(ModuleEntry) node;
28 module_init_type type;
31 typedef QTAILQ_HEAD(, ModuleEntry) ModuleTypeList;
33 static ModuleTypeList init_type_list[MODULE_INIT_MAX];
35 static ModuleTypeList dso_init_list;
37 static void init_lists(void)
46 for (i = 0; i < MODULE_INIT_MAX; i++) {
47 QTAILQ_INIT(&init_type_list[i]);
50 QTAILQ_INIT(&dso_init_list);
56 static ModuleTypeList *find_type(module_init_type type)
60 return &init_type_list[type];
63 void register_module_init(void (*fn)(void), module_init_type type)
68 e = g_malloc0(sizeof(*e));
74 QTAILQ_INSERT_TAIL(l, e, node);
77 void register_dso_module_init(void (*fn)(void), module_init_type type)
83 e = g_malloc0(sizeof(*e));
87 QTAILQ_INSERT_TAIL(&dso_init_list, e, node);
90 void module_call_init(module_init_type type)
97 QTAILQ_FOREACH(e, l, node) {
102 #ifdef CONFIG_MODULES
103 static int module_load_file(const char *fname)
107 const char *dsosuf = HOST_DSOSUF;
108 int len = strlen(fname);
109 int suf_len = strlen(dsosuf);
110 ModuleEntry *e, *next;
113 if (len <= suf_len || strcmp(&fname[len - suf_len], dsosuf)) {
118 if (access(fname, F_OK)) {
123 assert(QTAILQ_EMPTY(&dso_init_list));
125 g_module = g_module_open(fname, G_MODULE_BIND_LAZY | G_MODULE_BIND_LOCAL);
127 fprintf(stderr, "Failed to open module: %s\n",
132 if (!g_module_symbol(g_module, DSO_STAMP_FUN_STR, (gpointer *)&sym)) {
133 fprintf(stderr, "Failed to initialize module: %s\n",
135 /* Print some info if this is a QEMU module (but from different build),
136 * this will make debugging user problems easier. */
137 if (g_module_symbol(g_module, "qemu_module_dummy", (gpointer *)&sym)) {
139 "Note: only modules from the same build can be loaded.\n");
141 g_module_close(g_module);
144 QTAILQ_FOREACH(e, &dso_init_list, node) {
146 register_module_init(e->init, e->type);
151 QTAILQ_FOREACH_SAFE(e, &dso_init_list, node, next) {
152 QTAILQ_REMOVE(&dso_init_list, e, node);
160 void module_load_one(const char *prefix, const char *lib_name)
162 #ifdef CONFIG_MODULES
169 static GHashTable *loaded_modules;
171 if (!g_module_supported()) {
172 fprintf(stderr, "Module is not supported by system.\n");
176 if (!loaded_modules) {
177 loaded_modules = g_hash_table_new(g_str_hash, g_str_equal);
180 module_name = g_strdup_printf("%s%s", prefix, lib_name);
182 if (g_hash_table_lookup(loaded_modules, module_name)) {
186 g_hash_table_insert(loaded_modules, module_name, module_name);
188 exec_dir = qemu_get_exec_dir();
189 dirs[i++] = g_strdup_printf("%s", CONFIG_QEMU_MODDIR);
190 dirs[i++] = g_strdup_printf("%s/..", exec_dir ? : "");
191 dirs[i++] = g_strdup_printf("%s", exec_dir ? : "");
192 assert(i == ARRAY_SIZE(dirs));
196 for (i = 0; i < ARRAY_SIZE(dirs); i++) {
197 fname = g_strdup_printf("%s/%s%s",
198 dirs[i], module_name, HOST_DSOSUF);
199 ret = module_load_file(fname);
202 /* Try loading until loaded a module file */
208 for (i = 0; i < ARRAY_SIZE(dirs); i++) {