#include <string.h>
#include <sys/stat.h>
#include <fcntl.h>
-#include <syslog.h>
#include <libgen.h>
#include <glob.h>
#include <elf.h>
#include <libubox/avl.h>
#include <libubox/avl-cmp.h>
#include <libubox/utils.h>
+#include <libubox/ulog.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)
-
+#define DEF_MOD_PATH "/modules/%s/"
enum {
SCANNED,
};
struct module {
- struct avl_node avl;
-
char *name;
char *depends;
+ char *opts;
int size;
int usage;
int state;
int error;
+ int refcnt; /* number of references from module_node.m */
+};
+
+struct module_node {
+ struct avl_node avl;
+ struct module *m;
+ bool is_alias;
};
static struct avl_tree modules;
-static char *prefix = "";
+
+static char **module_folders = NULL;
+
+static void free_module(struct module *m);
+
+static int init_module_folders(void)
+{
+ int n = 0;
+ struct stat st;
+ struct utsname ver;
+ char *s, *e, *p, path[256], ldpath[256];
+
+ e = ldpath;
+ s = getenv("LD_LIBRARY_PATH");
+
+ if (s)
+ e += snprintf(ldpath, sizeof(ldpath), "%s:", s);
+
+ e += snprintf(e, sizeof(ldpath) - (e - ldpath), "/lib");
+
+ uname(&ver);
+
+ for (s = p = ldpath; p <= e; p++) {
+ if (*p != ':' && *p != '\0')
+ continue;
+
+ *p = 0;
+ snprintf(path, sizeof(path), "%s" DEF_MOD_PATH, s, ver.release);
+
+ if (!stat(path, &st) && S_ISDIR(st.st_mode)) {
+ module_folders = realloc(module_folders, sizeof(p) * (n + 2));
+
+ if (!module_folders) {
+ ULOG_ERR("out of memory\n");
+ return -1;
+ }
+
+ module_folders[n++] = strdup(path);
+ }
+
+ s = p + 1;
+ }
+
+ if (!module_folders)
+ return -1;
+
+ module_folders[n] = NULL;
+ return 0;
+}
static struct module *find_module(const char *name)
{
- struct module *m;
- return avl_find_element(&modules, name, m, avl);
+ struct module_node *mn;
+ mn = avl_find_element(&modules, name, mn, avl);
+ if (mn)
+ return mn->m;
+ else
+ return NULL;
}
static void free_modules(void)
{
- struct module *m, *tmp;
+ struct module_node *mn, *tmp;
+
+ avl_remove_all_elements(&modules, mn, avl, tmp) {
+ struct module *m = mn->m;
- avl_remove_all_elements(&modules, m, avl, tmp)
- free(m);
+ m->refcnt -= 1;
+ if (m->refcnt == 0)
+ free_module(m);
+ free(mn);
+ }
}
static char* get_module_path(char *name)
{
+ char **p;
static char path[256];
- struct utsname ver;
struct stat s;
- if (!stat(name, &s))
+ if (!stat(name, &s) && S_ISREG(s.st_mode))
return name;
- uname(&ver);
- snprintf(path, 256, "%s" DEF_MOD_PATH "%s.ko", prefix, ver.release, name);
-
- if (!stat(path, &s))
- return path;
+ for (p = module_folders; *p; p++) {
+ snprintf(path, sizeof(path), "%s%s.ko", *p, name);
+ if (!stat(path, &s) && S_ISREG(s.st_mode))
+ return path;
+ }
return NULL;
}
static char* get_module_name(char *path)
{
- static char name[32];
+ static char name[33];
char *t;
- strncpy(name, basename(path), sizeof(name));
+ strncpy(name, basename(path), sizeof(name) - 1);
t = strstr(name, ".ko");
if (t)
return name;
}
-#if __WORDSIZE == 64
-static int elf_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
+static int elf64_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
{
const char *secnames;
Elf64_Ehdr *e;
return -1;
}
-#else
-static int elf_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
+
+static int elf32_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
{
const char *secnames;
Elf32_Ehdr *e;
return -1;
}
+
+static int elf_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
+{
+ int clazz = map[EI_CLASS];
+ int endian = map[EI_DATA];
+
+#if __BYTE_ORDER == __LITTLE_ENDIAN
+ if (endian != ELFDATA2LSB)
+#elif __BYTE_ORDER == __BIG_ENDIAN
+ if (endian != ELFDATA2MSB)
+#else
+#error "unsupported endian"
#endif
+ {
+ ULOG_ERR("invalid endianess: %d\n", endian);
+ return -1;
+ }
+
+ if (clazz == ELFCLASS32)
+ return elf32_find_section(map, section, offset, size);
+ else if (clazz == ELFCLASS64)
+ return elf64_find_section(map, section, offset, size);
+
+ ULOG_ERR("unknown elf format %d\n", clazz);
+
+ return -1;
+}
+
+static struct module_node *
+alloc_module_node(const char *name, struct module *m, bool is_alias)
+{
+ struct module_node *mn;
+ char *_name;
+
+ mn = calloc_a(sizeof(*mn),
+ &_name, strlen(name) + 1);
+ if (mn) {
+ mn->avl.key = strcpy(_name, name);
+ mn->m = m;
+ mn->is_alias = is_alias;
+ avl_insert(&modules, &mn->avl);
+ m->refcnt += 1;
+ }
+ return mn;
+}
static struct module *
-alloc_module(const char *name, const char *depends, int size)
+alloc_module(const char *name, const char * const *aliases, int naliases, const char *depends, int size)
{
struct module *m;
char *_name, *_dep;
+ int i;
m = calloc_a(sizeof(*m),
&_name, strlen(name) + 1,
if (!m)
return NULL;
- m->avl.key = m->name = strcpy(_name, name);
+ m->name = strcpy(_name, name);
+ m->opts = 0;
if (depends) {
m->depends = strcpy(_dep, depends);
_dep++;
}
}
-
m->size = size;
- avl_insert(&modules, &m->avl);
+
+ m->refcnt = 0;
+ alloc_module_node(m->name, m, false);
+ for (i = 0; i < naliases; i++)
+ alloc_module_node(aliases[i], m, true);
return m;
}
+static void free_module(struct module *m)
+{
+ if (m->opts)
+ free(m->opts);
+ free(m);
+}
+
static int scan_loaded_modules(void)
{
size_t buf_len = 0;
fp = fopen("/proc/modules", "r");
if (!fp) {
- LOG("failed to open /proc/modules\n");
+ ULOG_ERR("failed to open /proc/modules\n");
return -1;
}
if (!m.name || !m.depends)
continue;
- n = alloc_module(m.name, m.depends, m.size);
+ n = find_module(m.name);
+ if (!n) {
+ /* possibly a module outside /lib/modules/<ver>/ */
+ n = alloc_module(m.name, NULL, 0, m.depends, m.size);
+ }
n->usage = m.usage;
n->state = LOADED;
}
{
int fd = open(module, O_RDONLY);
unsigned int offset, size;
- char *map, *strings, *dep = NULL;
- struct module *m;
+ char *map = MAP_FAILED, *strings, *dep = NULL;
+ const char **aliases = NULL;
+ int naliases = 0;
+ struct module *m = NULL;
struct stat s;
- if (!fd) {
- LOG("failed to open %s\n", module);
- return NULL;
+ if (fd < 0) {
+ ULOG_ERR("failed to open %s\n", module);
+ goto out;
}
if (fstat(fd, &s) == -1) {
- LOG("failed to stat %s\n", module);
- return NULL;
+ ULOG_ERR("failed to stat %s\n", module);
+ goto out;
}
map = mmap(NULL, s.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
if (map == MAP_FAILED) {
- LOG("failed to mmap %s\n", module);
- return NULL;
+ ULOG_ERR("failed to mmap %s\n", module);
+ goto out;
}
if (elf_find_section(map, ".modinfo", &offset, &size)) {
- LOG("failed to load the .modinfo section from %s\n", module);
- return NULL;
+ ULOG_ERR("failed to load the .modinfo section from %s\n", module);
+ goto out;
}
strings = map + offset;
- while (strings && (strings < map + offset + size)) {
+ while (true) {
char *sep;
int len;
while (!strings[0])
strings++;
+ if (strings >= map + offset + size)
+ break;
sep = strstr(strings, "=");
if (!sep)
break;
sep++;
if (!strncmp(strings, "depends=", len + 1))
dep = sep;
+ else if (!strncmp(strings, "alias=", len + 1)) {
+ aliases = realloc(aliases, sizeof(sep) * (naliases + 1));
+ if (!aliases) {
+ ULOG_ERR("out of memory\n");
+ goto out;
+ }
+
+ aliases[naliases++] = sep;
+ }
strings = &sep[strlen(sep)];
}
- m = alloc_module(name, dep, s.st_size);
- if (!m)
- return NULL;
+ m = alloc_module(name, aliases, naliases, dep, s.st_size);
+
+ if (m)
+ m->state = SCANNED;
+
+out:
+ if (map != MAP_FAILED)
+ munmap(map, s.st_size);
+
+ if (fd >= 0)
+ close(fd);
- m->state = SCANNED;
+ free(aliases);
return m;
}
-static int scan_module_folder(void)
+static int scan_module_folder(const char *dir)
{
int gl_flags = GLOB_NOESCAPE | GLOB_MARK;
struct utsname ver;
char *path;
glob_t gl;
- int j;
+ int j, rv = 0;
uname(&ver);
- path = alloca(sizeof(DEF_MOD_PATH "*.ko") + strlen(ver.release) + 1);
- sprintf(path, DEF_MOD_PATH "*.ko", ver.release);
+ path = alloca(strlen(dir) + sizeof("*.ko") + 1);
+ sprintf(path, "%s*.ko", dir);
if (glob(path, gl_flags, NULL, &gl) < 0)
return -1;
continue;
m = find_module(name);
- if (!m)
- get_module_info(gl.gl_pathv[j], name);
+ if (!m) {
+ if (!get_module_info(gl.gl_pathv[j], name))
+ rv |= -1;
+ }
}
globfree(&gl);
- return 0;
+ return rv;
+}
+
+static int scan_module_folders(void)
+{
+ int rv = 0;
+ char **p;
+
+ if (init_module_folders())
+ return -1;
+
+ for (p = module_folders; *p; p++)
+ rv |= scan_module_folder(*p);
+
+ return rv;
}
static int print_modinfo(char *module)
int fd = open(module, O_RDONLY);
unsigned int offset, size;
struct stat s;
- char *map, *strings;
+ char *map = MAP_FAILED, *strings;
+ int rv = -1;
- if (!fd) {
- LOG("failed to open %s\n", module);
- return -1;
+ if (fd < 0) {
+ ULOG_ERR("failed to open %s\n", module);
+ goto out;
}
if (fstat(fd, &s) == -1) {
- LOG("failed to stat %s\n", module);
- return -1;
+ ULOG_ERR("failed to stat %s\n", module);
+ goto out;
}
map = mmap(NULL, s.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
if (map == MAP_FAILED) {
- LOG("failed to mmap %s\n", module);
- return -1;
+ ULOG_ERR("failed to mmap %s\n", module);
+ goto out;
}
if (elf_find_section(map, ".modinfo", &offset, &size)) {
- LOG("failed to load the .modinfo section from %s\n", module);
- return -1;
+ ULOG_ERR("failed to load the .modinfo section from %s\n", module);
+ goto out;
}
strings = map + offset;
printf("module:\t\t%s\n", module);
- while (strings && (strings < map + offset + size)) {
+ while (true) {
char *dup = NULL;
char *sep;
while (!strings[0])
strings++;
+ if (strings >= map + offset + size)
+ break;
sep = strstr(strings, "=");
if (!sep)
break;
free(dup);
}
- return 0;
+ rv = 0;
+
+out:
+ if (map != MAP_FAILED)
+ munmap(map, s.st_size);
+
+ if (fd >= 0)
+ close(fd);
+
+ return rv;
}
static int deps_available(struct module *m, int verbose)
char *dep;
int err = 0;
- if (!strcmp(m->depends, "-") || !strcmp(m->depends, ""))
+ if (!m->depends || !strcmp(m->depends, "-") || !strcmp(m->depends, ""))
return 0;
dep = m->depends;
m = find_module(dep);
if (verbose && !m)
- LOG("missing dependency %s\n", dep);
+ ULOG_ERR("missing dependency %s\n", dep);
if (verbose && m && (m->state != LOADED))
- LOG("dependency not loaded %s\n", dep);
+ ULOG_ERR("dependency not loaded %s\n", dep);
if (!m || (m->state != LOADED))
err++;
dep += strlen(dep) + 1;
int fd, ret = -1;
if (stat(path, &s)) {
- LOG("missing module %s\n", path);
+ ULOG_ERR("missing module %s\n", path);
return ret;
}
fd = open(path, O_RDONLY);
- if (!fd) {
- LOG("cannot open %s\n", path);
+ if (fd < 0) {
+ ULOG_ERR("cannot open %s\n", path);
return ret;
}
data = malloc(s.st_size);
- if (read(fd, data, s.st_size) == s.st_size)
- ret = syscall(__NR_init_module, data, s.st_size, options);
+ if (!data) {
+ ULOG_ERR("out of memory\n");
+ goto out;
+ }
+
+ if (read(fd, data, s.st_size) == s.st_size) {
+ ret = syscall(__NR_init_module, data, (unsigned long) s.st_size, options);
+ if (errno == EEXIST)
+ ret = 0;
+ }
else
- LOG("failed to read full module %s\n", path);
+ ULOG_ERR("failed to read full module %s\n", path);
+out:
close(fd);
free(data);
m = find_module(dep);
if (!m)
- LOG("failed to find dependency %s\n", dep);
+ ULOG_ERR("failed to find dependency %s\n", dep);
if (m && (m->state != LOADED)) {
m->state = PROBE;
load_moddeps(m);
static int load_modprobe(void)
{
int loaded, todo;
+ struct module_node *mn;
struct module *m;
- avl_for_each_element(&modules, m, avl)
+ avl_for_each_element(&modules, mn, avl) {
+ if (mn->is_alias)
+ continue;
+ m = mn->m;
if (m->state == PROBE)
load_moddeps(m);
+ }
do {
loaded = 0;
todo = 0;
- avl_for_each_element(&modules, m, avl) {
+ avl_for_each_element(&modules, mn, avl) {
+ if (mn->is_alias)
+ continue;
+ m = mn->m;
if ((m->state == PROBE) && (!deps_available(m, 0))) {
- if (!insert_module(get_module_path(m->name), "")) {
+ if (!insert_module(get_module_path(m->name), (m->opts) ? (m->opts) : (""))) {
m->state = LOADED;
m->error = 0;
loaded++;
static int print_insmod_usage(void)
{
- LOG("Usage:\n\tinsmod filename [args]\n");
+ ULOG_INFO("Usage:\n\tinsmod filename [args]\n");
+
+ return -1;
+}
+
+static int print_modprobe_usage(void)
+{
+ ULOG_INFO("Usage:\n\tmodprobe [-q] filename\n");
return -1;
}
static int print_usage(char *arg)
{
- LOG("Usage:\n\t%s module\n", arg);
+ ULOG_INFO("Usage:\n\t%s module\n", arg);
return -1;
}
name = get_module_name(argv[1]);
if (!name) {
- LOG("cannot find module - %s\n", argv[1]);
+ ULOG_ERR("cannot find module - %s\n", argv[1]);
return -1;
}
return -1;
if (find_module(name)) {
- LOG("module is already loaded - %s\n", name);
+ ULOG_ERR("module is already loaded - %s\n", name);
return -1;
}
len += strlen(argv[i]) + 1;
options = malloc(len);
+ if (!options) {
+ ULOG_ERR("out of memory\n");
+ ret = -1;
+ goto err;
+ }
+
options[0] = 0;
cur = options;
for (i = 2; i < argc; i++) {
cur += sprintf(cur, "%s", argv[i]);
}
- ret = insert_module(get_module_path(name), options);
- free(options);
+ if (init_module_folders()) {
+ fprintf(stderr, "Failed to find the folder holding the modules\n");
+ ret = -1;
+ goto err;
+ }
+ if (get_module_path(argv[1])) {
+ name = argv[1];
+ } else if (!get_module_path(name)) {
+ fprintf(stderr, "Failed to find %s. Maybe it is a built in module ?\n", name);
+ ret = -1;
+ goto err;
+ }
+
+ ret = insert_module(get_module_path(name), options);
if (ret)
- LOG("failed to insert %s\n", get_module_path(name));
+ ULOG_ERR("failed to insert %s\n", get_module_path(name));
+err:
+ free(options);
return ret;
}
name = get_module_name(argv[1]);
m = find_module(name);
if (!m) {
- LOG("module is not loaded\n");
+ ULOG_ERR("module is not loaded\n");
return -1;
}
ret = syscall(__NR_delete_module, m->name, 0);
if (ret)
- LOG("unloading the module failed\n");
+ ULOG_ERR("unloading the module failed\n");
free_modules();
static int main_lsmod(int argc, char **argv)
{
+ struct module_node *mn;
struct module *m;
+ char *dep;
if (scan_loaded_modules())
return -1;
- avl_for_each_element(&modules, m, avl)
- if (m->state == LOADED)
- printf("%-20s%8d%3d %s\n",
- m->name, m->size, m->usage,
- (*m->depends == '-') ? ("") : (m->depends));
+ avl_for_each_element(&modules, mn, avl) {
+ if (mn->is_alias)
+ continue;
+ m = mn->m;
+ if (m->state == LOADED) {
+ printf("%-20s%8d%3d ",
+ m->name, m->size, m->usage);
+ if (m->depends && strcmp(m->depends, "-") && strcmp(m->depends, "")) {
+ dep = m->depends;
+ while (*dep) {
+ printf("%s", dep);
+ dep = dep + strlen(dep) + 1;
+ if (*dep)
+ printf(",");
+ }
+ }
+ printf("\n");
+ }
+ }
free_modules();
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) {
- LOG("cannot find module - %s\n", argv[1]);
+ if (scan_module_folders())
+ return -1;
+
+ name = get_module_name(argv[1]);
+ m = find_module(name);
+ if (!m) {
+ ULOG_ERR("cannot find module - %s\n", argv[1]);
return -1;
}
- print_modinfo(module);
+ name = get_module_path(m->name);
+ if (!name) {
+ ULOG_ERR("cannot find path of module - %s\n", m->name);
+ return -1;
+ }
+
+ print_modinfo(name);
return 0;
}
static int main_modprobe(int argc, char **argv)
{
+ struct module_node *mn;
struct module *m;
char *name;
+ char *mod = NULL;
+ int opt;
+ bool quiet = false;
+
+ while ((opt = getopt(argc, argv, "q")) != -1 ) {
+ switch (opt) {
+ case 'q': /* shhhh! */
+ quiet = true;
+ break;
+ default: /* '?' */
+ return print_modprobe_usage();
+ break;
+ }
+ }
- if (argc != 2)
- return print_usage("modprobe");
+ if (optind >= argc)
+ return print_modprobe_usage(); /* expected module after options */
- if (scan_loaded_modules())
+ mod = argv[optind];
+
+ if (scan_module_folders())
return -1;
- if (scan_module_folder())
+ if (scan_loaded_modules())
return -1;
- name = get_module_name(argv[1]);
+ name = get_module_name(mod);
m = find_module(name);
if (m && m->state == LOADED) {
- LOG("%s is already loaded\n", name);
- return -1;
+ if (!quiet)
+ ULOG_ERR("%s is already loaded\n", name);
+ return 0;
} else if (!m) {
- LOG("failed to find a module named %s\n", name);
+ if (!quiet)
+ ULOG_ERR("failed to find a module named %s\n", name);
+ return -1;
} else {
int fail;
fail = load_modprobe();
if (fail) {
- LOG("%d module%s could not be probed\n",
- fail, (fail == 1) ? ("") : ("s"));
+ ULOG_ERR("%d module%s could not be probed\n",
+ fail, (fail == 1) ? ("") : ("s"));
- avl_for_each_element(&modules, m, avl)
+ avl_for_each_element(&modules, mn, avl) {
+ if (mn->is_alias)
+ continue;
+ m = mn->m;
if ((m->state == PROBE) || m->error)
- LOG("- %s\n", m->name);
+ ULOG_ERR("- %s\n", m->name);
+ }
}
}
static int main_loader(int argc, char **argv)
{
int gl_flags = GLOB_NOESCAPE | GLOB_MARK;
- char *dir = "/etc/modules.d/*";
+ char *dir = "/etc/modules.d/";
+ struct module_node *mn;
struct module *m;
glob_t gl;
char *path;
if (argc > 1)
dir = argv[1];
- if (argc > 2)
- prefix = argv[2];
-
path = malloc(strlen(dir) + 2);
+ if (!path) {
+ ULOG_ERR("out of memory\n");
+ return -1;
+ }
+
strcpy(path, dir);
strcat(path, "*");
- if (scan_loaded_modules())
+ if (scan_module_folders()) {
+ free (path);
return -1;
+ }
- if (scan_module_folder())
+ if (scan_loaded_modules()) {
+ free (path);
return -1;
+ }
- syslog(0, "kmodloader: loading kernel modules from %s\n", path);
+ ULOG_INFO("loading kernel modules from %s\n", path);
if (glob(path, gl_flags, NULL, &gl) < 0)
goto out;
char *mod = NULL;
if (!fp) {
- LOG("failed to open %s\n", gl.gl_pathv[j]);
+ ULOG_ERR("failed to open %s\n", gl.gl_pathv[j]);
continue;
}
if (!m || (m->state == LOADED))
continue;
+ if (opts)
+ m->opts = strdup(opts);
m->state = PROBE;
if (basename(gl.gl_pathv[j])[0] - '0' <= 9)
load_modprobe();
}
fail = load_modprobe();
- LOG("ran %d iterations\n", iterations);
if (fail) {
- LOG("%d module%s could not be probed\n",
- fail, (fail == 1) ? ("") : ("s"));
+ ULOG_ERR("%d module%s could not be probed\n",
+ fail, (fail == 1) ? ("") : ("s"));
- avl_for_each_element(&modules, m, avl)
+ avl_for_each_element(&modules, mn, avl) {
+ if (mn->is_alias)
+ continue;
+ m = mn->m;
if ((m->state == PROBE) || (m->error))
- LOG("- %s - %d\n", m->name, deps_available(m, 1));
+ ULOG_ERR("- %s - %d\n", m->name, deps_available(m, 1));
+ }
+ } else {
+ ULOG_INFO("done loading kernel modules from %s\n", path);
}
out:
return 0;
}
+static inline char weight(char c)
+{
+ return c == '_' ? '-' : c;
+}
+
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 == '_'))))
+ while (*s1 && (weight(*s1) == weight(*s2)))
{
s1++;
s2++;
}
- return *(const unsigned char *)s1 - *(const unsigned char *)s2;
+ return (unsigned char)weight(*s1) - (unsigned char)weight(*s2);
}
int main(int argc, char **argv)
if (!strcmp(exec, "modprobe"))
return main_modprobe(argc, argv);
+ ulog_open(ULOG_KMSG, LOG_USER, "kmodloader");
return main_loader(argc, argv);
}