#include <sys/stat.h>
#include <fcntl.h>
#include <syslog.h>
+#include <libgen.h>
#include <glob.h>
#include <elf.h>
-#include <libubox/list.h>
+#include <libubox/avl.h>
+#include <libubox/avl-cmp.h>
+#include <libubox/utils.h>
#define DEF_MOD_PATH "/lib/modules/%s/"
+#define LOG(fmt, ...) do { \
+ syslog(LOG_INFO, fmt, ## __VA_ARGS__); \
+ printf("kmod: "fmt, ## __VA_ARGS__); \
+ } while (0)
+
+
enum {
SCANNED,
PROBE,
LOADED,
- FAILED,
};
struct module {
- struct list_head list;
+ struct avl_node avl;
char *name;
char *depends;
int size;
int usage;
int state;
+ int error;
};
-static LIST_HEAD(modules);
-
-static struct module* find_module(char *name)
-{
- struct module *m = NULL;
-
- list_for_each_entry(m, &modules, list)
- if (!strcmp(m->name, name))
- return m;
- return NULL;
-}
+static struct avl_tree modules;
+static char *prefix = "";
-static void free_module(struct module *m)
+static struct module *find_module(const char *name)
{
- if (m->name)
- free(m->name);
- if (m->depends)
- free(m->depends);
- free(m);
+ struct module *m;
+ return avl_find_element(&modules, name, m, avl);
}
static void free_modules(void)
{
- struct list_head *p, *n;
+ struct module *m, *tmp;
- list_for_each_safe(p, n, &modules) {
- struct module *m = container_of(p, struct module, list);
- list_del(p);
- free_module(m);
- }
+ avl_remove_all_elements(&modules, m, avl, tmp)
+ free(m);
}
static char* get_module_path(char *name)
static char path[256];
struct utsname ver;
struct stat s;
- char *t;
if (!stat(name, &s))
return name;
uname(&ver);
- snprintf(path, 256, DEF_MOD_PATH "%s.ko", ver.release, name);
-
- if (!stat(path, &s))
- return path;
-
- t = name;
- while (t && *t) {
- if (*t == '_')
- *t = '-';
- t++;
- }
-
- snprintf(path, 256, DEF_MOD_PATH "%s.ko", ver.release, name);
+ snprintf(path, 256, "%s" DEF_MOD_PATH "%s.ko", prefix, ver.release, name);
if (!stat(path, &s))
return path;
t = strstr(name, ".ko");
if (t)
*t = '\0';
- t = name;
- while (t && *t) {
- if (*t == '-')
- *t = '_';
- t++;
- }
return name;
}
}
#endif
+static struct module *
+alloc_module(const char *name, const char *depends, int size)
+{
+ struct module *m;
+ char *_name, *_dep;
+
+ m = calloc_a(sizeof(*m),
+ &_name, strlen(name) + 1,
+ &_dep, depends ? strlen(depends) + 2 : 0);
+ if (!m)
+ return NULL;
+
+ m->avl.key = m->name = strcpy(_name, name);
+
+ if (depends) {
+ m->depends = strcpy(_dep, depends);
+ while (*_dep) {
+ if (*_dep == ',')
+ *_dep = '\0';
+ _dep++;
+ }
+ }
+
+ m->size = size;
+ avl_insert(&modules, &m->avl);
+
+ return m;
+}
+
static int scan_loaded_modules(void)
{
- FILE *fp = fopen("/proc/modules", "r");
- char buf[256];
+ size_t buf_len = 0;
+ char *buf = NULL;
+ FILE *fp;
+ fp = fopen("/proc/modules", "r");
if (!fp) {
- fprintf(stderr, "failed to open /proc/modules\n");
+ LOG("failed to open /proc/modules\n");
return -1;
}
- while (fgets(buf, sizeof(buf), fp)) {
+ while (getline(&buf, &buf_len, fp) > 0) {
struct module m;
struct module *n;
if (!m.name || !m.depends)
continue;
- n = malloc(sizeof(struct module));
- if (!n)
- continue;
-
- n->name = strdup(m.name);
- n->depends = strdup(m.depends);
- n->size = m.size;
+ n = alloc_module(m.name, m.depends, m.size);
n->usage = m.usage;
n->state = LOADED;
-
- list_add_tail(&n->list, &modules);
}
+ free(buf);
+ fclose(fp);
return 0;
}
-static struct module* get_module_info(char *module)
+static struct module* get_module_info(const char *module, const char *name)
{
int fd = open(module, O_RDONLY);
unsigned int offset, size;
- char *map, *strings;
+ char *map, *strings, *dep = NULL;
struct module *m;
struct stat s;
if (!fd) {
- fprintf(stderr, "failed to open %s\n", module);
+ LOG("failed to open %s\n", module);
return NULL;
}
if (fstat(fd, &s) == -1) {
- fprintf(stderr, "failed to stat %s\n", module);
+ LOG("failed to stat %s\n", module);
return NULL;
}
map = mmap(NULL, s.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
if (map == MAP_FAILED) {
- fprintf(stderr, "failed to mmap %s\n", module);
+ LOG("failed to mmap %s\n", module);
return NULL;
}
if (elf_find_section(map, ".modinfo", &offset, &size)) {
- fprintf(stderr, "failed to load the .modinfo section from %s\n", module);
+ LOG("failed to load the .modinfo section from %s\n", module);
return NULL;
}
strings = map + offset;
- m = malloc(sizeof(struct module));
- if (!m)
- return NULL;
-
- memset(m, 0, sizeof(struct module));
- m->size = s.st_size;
while (strings && (strings < map + offset + size)) {
char *sep;
int len;
len = sep - strings;
sep++;
if (!strncmp(strings, "depends=", len + 1))
- m->depends = strdup(sep);
+ dep = sep;
strings = &sep[strlen(sep)];
}
+ m = alloc_module(name, dep, s.st_size);
+ if (!m)
+ return NULL;
+
m->state = SCANNED;
return m;
}
-static int scan_module_folder(char *dir)
+static int scan_module_folder(void)
{
int gl_flags = GLOB_NOESCAPE | GLOB_MARK;
- int j;
+ struct utsname ver;
+ char *path;
glob_t gl;
+ int j;
+
+ uname(&ver);
+ path = alloca(sizeof(DEF_MOD_PATH "*.ko") + strlen(prefix) + strlen(ver.release) + 1);
+ sprintf(path, "%s" DEF_MOD_PATH "*.ko", prefix, ver.release);
- if (glob(dir, gl_flags, NULL, &gl) < 0)
+ if (glob(path, gl_flags, NULL, &gl) < 0)
return -1;
for (j = 0; j < gl.gl_pathc; j++) {
continue;
m = find_module(name);
- if (!m) {
- m = get_module_info(gl.gl_pathv[j]);
- m->name = strdup(name);
- list_add_tail(&m->list, &modules);
- }
+ if (!m)
+ get_module_info(gl.gl_pathv[j], name);
}
globfree(&gl);
char *map, *strings;
if (!fd) {
- fprintf(stderr, "failed to open %s\n", module);
+ LOG("failed to open %s\n", module);
return -1;
}
if (fstat(fd, &s) == -1) {
- fprintf(stderr, "failed to stat %s\n", module);
+ LOG("failed to stat %s\n", module);
return -1;
}
map = mmap(NULL, s.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
if (map == MAP_FAILED) {
- fprintf(stderr, "failed to mmap %s\n", module);
+ LOG("failed to mmap %s\n", module);
return -1;
}
if (elf_find_section(map, ".modinfo", &offset, &size)) {
- fprintf(stderr, "failed to load the .modinfo section from %s\n", module);
+ LOG("failed to load the .modinfo section from %s\n", module);
return -1;
}
return 0;
}
+static int deps_available(struct module *m, int verbose)
+{
+ char *dep;
+ int err = 0;
+
+ if (!strcmp(m->depends, "-") || !strcmp(m->depends, ""))
+ return 0;
+
+ dep = m->depends;
+
+ while (*dep) {
+ m = find_module(dep);
+
+ if (verbose && !m)
+ LOG("missing dependency %s\n", dep);
+ if (verbose && m && (m->state != LOADED))
+ LOG("dependency not loaded %s\n", dep);
+ if (!m || (m->state != LOADED))
+ err++;
+ dep += strlen(dep) + 1;
+ }
+
+ return err;
+}
+
static int insert_module(char *path, const char *options)
{
void *data = 0;
int fd, ret = -1;
if (stat(path, &s)) {
- fprintf(stderr, "missing module %s\n", path);
+ LOG("missing module %s\n", path);
return ret;
}
fd = open(path, O_RDONLY);
if (!fd) {
- fprintf(stderr, "cannot open %s\n", path);
+ LOG("cannot open %s\n", path);
return ret;
}
data = malloc(s.st_size);
- if (read(fd, data, s.st_size) == s.st_size) {
+ if (read(fd, data, s.st_size) == s.st_size)
ret = syscall(__NR_init_module, data, s.st_size, options);
- if (ret)
- fprintf(stderr, "failed to insert %s\n", path);
- } else {
- fprintf(stderr, "failed to read full module %s\n", path);
- }
+ else
+ LOG("failed to read full module %s\n", path);
close(fd);
free(data);
return ret;
}
-static int deps_available(struct module *m)
+static void load_moddeps(struct module *_m)
{
- char *deps = m->depends;
- char *comma;
+ char *dep;
+ struct module *m;
- if (!strcmp(deps, "-"))
- return 0;
- while (*deps && (NULL != ((comma = strstr(deps, ","))))) {
- *comma = '\0';
+ if (!strcmp(_m->depends, "-") || !strcmp(_m->depends, ""))
+ return;
- m = find_module(deps);
+ dep = _m->depends;
- if (!m || (m->state != LOADED))
- return -1;
+ while (*dep) {
+ m = find_module(dep);
- deps = ++comma;
- }
+ if (!m)
+ LOG("failed to find dependency %s\n", dep);
+ if (m && (m->state != LOADED)) {
+ m->state = PROBE;
+ load_moddeps(m);
+ }
- return 0;
+ dep = dep + strlen(dep) + 1;
+ }
}
-static int load_depmod(void)
+static int iterations = 0;
+static int load_modprobe(void)
{
int loaded, todo;
struct module *m;
+ avl_for_each_element(&modules, m, avl)
+ if (m->state == PROBE)
+ load_moddeps(m);
+
do {
loaded = 0;
todo = 0;
- list_for_each_entry(m, &modules, list) {
- if ((m->state == PROBE) && (!deps_available(m))) {
+ avl_for_each_element(&modules, m, avl) {
+ if ((m->state == PROBE) && (!deps_available(m, 0))) {
if (!insert_module(get_module_path(m->name), "")) {
m->state = LOADED;
+ m->error = 0;
loaded++;
continue;
}
- m->state = FAILED;
- } else if (m->state == PROBE) {
- todo++;
+ m->error = 1;
}
+
+ if ((m->state == PROBE) || m->error)
+ todo++;
}
-// printf("loaded %d modules this pass\n", loaded);
+ iterations++;
} while (loaded);
-// printf("missing todos %d\n", todo);
-
- return -todo;
+ return todo;
}
static int print_insmod_usage(void)
{
- fprintf(stderr, "Usage:\n\tinsmod filename [args]\n");
+ LOG("Usage:\n\tinsmod filename [args]\n");
return -1;
}
static int print_usage(char *arg)
{
- fprintf(stderr, "Usage:\n\t%s module\n", arg);
+ LOG("Usage:\n\t%s module\n", arg);
return -1;
}
static int main_insmod(int argc, char **argv)
{
- char options[256] = "";
- char *name;
- int i;
+ char *name, *cur, *options;
+ int i, ret, len;
if (argc < 2)
return print_insmod_usage();
name = get_module_name(argv[1]);
if (!name) {
- fprintf(stderr, "cannot find module - %s\n", argv[1]);
+ LOG("cannot find module - %s\n", argv[1]);
return -1;
}
return -1;
if (find_module(name)) {
- fprintf(stderr, "module is already loaded - %s\n", name);
+ LOG("module is already loaded - %s\n", name);
return -1;
}
free_modules();
- for (i = 2; i < argc; i++)
- if (snprintf(options, sizeof(options), "%s %s", options, argv[i]) >= sizeof(options)) {
- fprintf(stderr, "argument line too long - %s\n", options);
- return -1;
+ for (len = 0, i = 2; i < argc; i++)
+ len += strlen(argv[i]) + 1;
+
+ options = malloc(len);
+ options[0] = 0;
+ cur = options;
+ for (i = 2; i < argc; i++) {
+ if (options[0]) {
+ *cur = ' ';
+ cur++;
}
+ cur += sprintf(cur, "%s", argv[i]);
+ }
+
+ ret = insert_module(get_module_path(name), options);
+ free(options);
+
+ if (ret)
+ LOG("failed to insert %s\n", get_module_path(name));
- return insert_module(get_module_path(name), options);
+ return ret;
}
static int main_rmmod(int argc, char **argv)
name = get_module_name(argv[1]);
m = find_module(name);
if (!m) {
- fprintf(stderr, "module is not loaded\n");
+ LOG("module is not loaded\n");
return -1;
}
- free_modules();
-
- ret = syscall(__NR_delete_module, name, 0);
+ ret = syscall(__NR_delete_module, m->name, 0);
if (ret)
- fprintf(stderr, "unloading the module failed\n");
+ LOG("unloading the module failed\n");
+
+ free_modules();
return ret;
}
if (scan_loaded_modules())
return -1;
- list_for_each_entry(m, &modules, list)
+ avl_for_each_element(&modules, m, avl)
if (m->state == LOADED)
printf("%-20s%8d%3d %s\n",
m->name, m->size, m->usage,
static int main_modinfo(int argc, char **argv)
{
- char *module;
+ struct module *m;
+ char *name;
if (argc != 2)
return print_usage("modinfo");
- module = get_module_path(argv[1]);
- if (!module) {
- fprintf(stderr, "cannot find module - %s\n", argv[1]);
+ if (scan_module_folder())
+ return -1;
+
+ name = get_module_name(argv[1]);
+ m = find_module(name);
+ if (!m) {
+ LOG("cannot find module - %s\n", argv[1]);
+ return -1;
+ }
+
+ name = get_module_path(m->name);
+ if (!name) {
+ LOG("cannot find path of module - %s\n", m->name);
return -1;
}
- print_modinfo(module);
+ print_modinfo(name);
return 0;
}
-static int main_depmod(int argc, char **argv)
+static int main_modprobe(int argc, char **argv)
{
- struct utsname ver;
struct module *m;
- char path[128];
char *name;
if (argc != 2)
- return print_usage("depmod");
+ return print_usage("modprobe");
if (scan_loaded_modules())
return -1;
- uname(&ver);
- snprintf(path, sizeof(path), DEF_MOD_PATH "*.ko", ver.release);
-
- scan_module_folder(path);
+ if (scan_module_folder())
+ return -1;
name = get_module_name(argv[1]);
m = find_module(name);
if (m && m->state == LOADED) {
- fprintf(stderr, "%s is already loaded\n", name);
+ LOG("%s is already loaded\n", name);
return -1;
} else if (!m) {
- fprintf(stderr, "failed to find a module named %s\n", name);
+ LOG("failed to find a module named %s\n", name);
} else {
+ int fail;
+
m->state = PROBE;
- load_depmod();
+
+ fail = load_modprobe();
+
+ if (fail) {
+ LOG("%d module%s could not be probed\n",
+ fail, (fail == 1) ? ("") : ("s"));
+
+ avl_for_each_element(&modules, m, avl)
+ if ((m->state == PROBE) || m->error)
+ LOG("- %s\n", m->name);
+ }
}
free_modules();
{
int gl_flags = GLOB_NOESCAPE | GLOB_MARK;
char *dir = "/etc/modules.d/*";
+ struct module *m;
glob_t gl;
char *path;
+ int fail, j;
if (argc > 1)
dir = argv[1];
+ if (argc > 2)
+ prefix = argv[2];
+
path = malloc(strlen(dir) + 2);
strcpy(path, dir);
strcat(path, "*");
+ if (scan_loaded_modules())
+ return -1;
+
+ if (scan_module_folder())
+ return -1;
+
syslog(0, "kmodloader: loading kernel modules from %s\n", path);
- if (glob(path, gl_flags, NULL, &gl) >= 0) {
- int j;
+ if (glob(path, gl_flags, NULL, &gl) < 0)
+ goto out;
- for (j = 0; j < gl.gl_pathc; j++) {
- FILE *fp = fopen(gl.gl_pathv[j], "r");
+ for (j = 0; j < gl.gl_pathc; j++) {
+ FILE *fp = fopen(gl.gl_pathv[j], "r");
+ size_t mod_len = 0;
+ char *mod = NULL;
- if (!fp) {
- fprintf(stderr, "failed to open %s\n", gl.gl_pathv[j]);
- } else {
- char mod[256];
+ if (!fp) {
+ LOG("failed to open %s\n", gl.gl_pathv[j]);
+ continue;
+ }
- while (fgets(mod, sizeof(mod), fp)) {
- char *nl = strchr(mod, '\n');
- char *opts;
+ while (getline(&mod, &mod_len, fp) > 0) {
+ char *nl = strchr(mod, '\n');
+ struct module *m;
+ char *opts;
- if (nl)
- *nl = '\0';
+ if (nl)
+ *nl = '\0';
- opts = strchr(mod, ' ');
- if (opts)
- *opts++ = '\0';
+ opts = strchr(mod, ' ');
+ if (opts)
+ *opts++ = '\0';
+
+ m = find_module(get_module_name(mod));
+ if (!m || (m->state == LOADED))
+ continue;
+
+ m->state = PROBE;
+ if (basename(gl.gl_pathv[j])[0] - '0' <= 9)
+ load_modprobe();
- insert_module(get_module_path(mod), (opts) ? (opts) : (""));
- }
- fclose(fp);
- }
}
+ free(mod);
+ fclose(fp);
+ }
+
+ fail = load_modprobe();
+ LOG("ran %d iterations\n", iterations);
+
+ if (fail) {
+ LOG("%d module%s could not be probed\n",
+ fail, (fail == 1) ? ("") : ("s"));
+
+ avl_for_each_element(&modules, m, avl)
+ if ((m->state == PROBE) || (m->error))
+ LOG("- %s - %d\n", m->name, deps_available(m, 1));
}
+out:
globfree(&gl);
free(path);
return 0;
}
+static int avl_modcmp(const void *k1, const void *k2, void *ptr)
+{
+ const char *s1 = k1;
+ const char *s2 = k2;
+
+ while (*s1 && ((*s1 == *s2) ||
+ ((*s1 == '_') && (*s2 == '-')) ||
+ ((*s1 == '-') && (*s2 == '_'))))
+ {
+ s1++;
+ s2++;
+ }
+
+ return *(const unsigned char *)s1 - *(const unsigned char *)s2;
+}
+
int main(int argc, char **argv)
{
char *exec = basename(*argv);
+ avl_init(&modules, avl_modcmp, false, NULL);
if (!strcmp(exec, "insmod"))
return main_insmod(argc, argv);
if (!strcmp(exec, "modinfo"))
return main_modinfo(argc, argv);
- if (!strcmp(exec, "depmod"))
- return main_depmod(argc, argv);
+ if (!strcmp(exec, "modprobe"))
+ return main_modprobe(argc, argv);
return main_loader(argc, argv);
}