libcacard: s/strip(args++)/strip(args+1)
[qemu/ar7.git] / module.c
blobe77d5697685a7927bee40329038eb97d0139f235
1 /*
2 * QEMU Module Infrastructure
4 * Copyright IBM, Corp. 2009
6 * Authors:
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.
14 #include "qemu-common.h"
15 #include "qemu-queue.h"
16 #include "module.h"
18 typedef struct ModuleEntry
20 module_init_type type;
21 void (*init)(void);
22 QTAILQ_ENTRY(ModuleEntry) node;
23 } ModuleEntry;
25 typedef QTAILQ_HEAD(, ModuleEntry) ModuleTypeList;
27 static ModuleTypeList init_type_list[MODULE_INIT_MAX];
29 static void init_types(void)
31 static int inited;
32 int i;
34 if (inited) {
35 return;
38 for (i = 0; i < MODULE_INIT_MAX; i++) {
39 QTAILQ_INIT(&init_type_list[i]);
42 inited = 1;
46 static ModuleTypeList *find_type(module_init_type type)
48 ModuleTypeList *l;
50 init_types();
52 l = &init_type_list[type];
54 return l;
57 void register_module_init(void (*fn)(void), module_init_type type)
59 ModuleEntry *e;
60 ModuleTypeList *l;
62 e = qemu_mallocz(sizeof(*e));
63 e->init = fn;
65 l = find_type(type);
67 QTAILQ_INSERT_TAIL(l, e, node);
70 void module_call_init(module_init_type type)
72 ModuleTypeList *l;
73 ModuleEntry *e;
75 l = find_type(type);
77 QTAILQ_FOREACH(e, l, node) {
78 e->init();