kmodloader: search kmods relative to LD_LIBRARY_PATH
[project/ubox.git] / kmodloader.c
index dee4b7c..4300baf 100644 (file)
 #include <libubox/avl-cmp.h>
 #include <libubox/utils.h>
 
-#define DEF_MOD_PATH "/lib/modules/%s/"
+#define DEF_MOD_PATH "/modules/%s/"
 
-#define LOG(fmt, ...) do { \
+#define INFO(fmt, ...) do { \
        syslog(LOG_INFO, fmt, ## __VA_ARGS__); \
        printf("kmod: "fmt, ## __VA_ARGS__); \
        } while (0)
+#define ERROR(fmt, ...) do { \
+       syslog(LOG_ERR, fmt, ## __VA_ARGS__); \
+       fprintf(stderr,"kmod: "fmt, ## __VA_ARGS__); \
+       } while (0)
+#define DEBUG(fmt, ...) do { \
+       syslog(LOG_DEBUG, fmt, ## __VA_ARGS__); \
+       } while (0)
 
 
 enum {
@@ -55,6 +62,7 @@ struct module {
 
        char *name;
        char *depends;
+       char *opts;
 
        int size;
        int usage;
@@ -63,7 +71,51 @@ struct module {
 };
 
 static struct avl_tree modules;
-static char *prefix = "";
+
+static char **module_folders = NULL;
+
+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)
+                               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)
 {
@@ -81,18 +133,18 @@ static void free_modules(void)
 
 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;
 }
@@ -111,8 +163,7 @@ static char* get_module_name(char *path)
        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;
@@ -133,8 +184,8 @@ static int elf_find_section(char *map, const char *section, unsigned int *offset
 
        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;
@@ -155,7 +206,20 @@ static int elf_find_section(char *map, const char *section, unsigned int *offset
 
        return -1;
 }
-#endif
+
+static int elf_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
+{
+       int clazz = map[EI_CLASS];
+
+       if (clazz == ELFCLASS32)
+               return elf32_find_section(map, section, offset, size);
+       else if (clazz == ELFCLASS64)
+               return elf64_find_section(map, section, offset, size);
+
+       ERROR("unknown elf format %d\n", clazz);
+
+       return -1;
+}
 
 static struct module *
 alloc_module(const char *name, const char *depends, int size)
@@ -170,6 +234,7 @@ alloc_module(const char *name, const char *depends, int size)
                return NULL;
 
        m->avl.key = m->name = strcpy(_name, name);
+       m->opts = 0;
 
        if (depends) {
                m->depends = strcpy(_dep, depends);
@@ -194,7 +259,7 @@ static int scan_loaded_modules(void)
 
        fp = fopen("/proc/modules", "r");
        if (!fp) {
-               LOG("failed to open /proc/modules\n");
+               ERROR("failed to open /proc/modules\n");
                return -1;
        }
 
@@ -229,23 +294,23 @@ static struct module* get_module_info(const char *module, const char *name)
        struct stat s;
 
        if (!fd) {
-               LOG("failed to open %s\n", module);
+               ERROR("failed to open %s\n", module);
                return NULL;
        }
 
        if (fstat(fd, &s) == -1) {
-               LOG("failed to stat %s\n", module);
+               ERROR("failed to stat %s\n", module);
                return NULL;
        }
 
        map = mmap(NULL, s.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
        if (map == MAP_FAILED) {
-               LOG("failed to mmap %s\n", module);
+               ERROR("failed to mmap %s\n", module);
                return NULL;
        }
 
        if (elf_find_section(map, ".modinfo", &offset, &size)) {
-               LOG("failed to load the .modinfo section from %s\n", module);
+               ERROR("failed to load the .modinfo section from %s\n", module);
                return NULL;
        }
 
@@ -275,7 +340,7 @@ static struct module* get_module_info(const char *module, const char *name)
        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;
@@ -284,8 +349,8 @@ static int scan_module_folder(void)
        int j;
 
        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;
@@ -307,6 +372,20 @@ static int scan_module_folder(void)
        return 0;
 }
 
+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);
@@ -315,23 +394,23 @@ static int print_modinfo(char *module)
        char *map, *strings;
 
        if (!fd) {
-               LOG("failed to open %s\n", module);
+               ERROR("failed to open %s\n", module);
                return -1;
        }
 
        if (fstat(fd, &s) == -1) {
-               LOG("failed to stat %s\n", module);
+               ERROR("failed to stat %s\n", module);
                return -1;
        }
 
        map = mmap(NULL, s.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
        if (map == MAP_FAILED) {
-               LOG("failed to mmap %s\n", module);
+               ERROR("failed to mmap %s\n", module);
                return -1;
        }
 
        if (elf_find_section(map, ".modinfo", &offset, &size)) {
-               LOG("failed to load the .modinfo section from %s\n", module);
+               ERROR("failed to load the .modinfo section from %s\n", module);
                return -1;
        }
 
@@ -376,9 +455,9 @@ static int deps_available(struct module *m, int verbose)
                m = find_module(dep);
 
                if (verbose && !m)
-                       LOG("missing dependency %s\n", dep);
+                       ERROR("missing dependency %s\n", dep);
                if (verbose && m && (m->state != LOADED))
-                       LOG("dependency not loaded %s\n", dep);
+                       ERROR("dependency not loaded %s\n", dep);
                if (!m || (m->state != LOADED))
                        err++;
                dep += strlen(dep) + 1;
@@ -394,21 +473,21 @@ static int insert_module(char *path, const char *options)
        int fd, ret = -1;
 
        if (stat(path, &s)) {
-               LOG("missing module %s\n", path);
+               ERROR("missing module %s\n", path);
                return ret;
        }
 
        fd = open(path, O_RDONLY);
        if (!fd) {
-               LOG("cannot open %s\n", path);
+               ERROR("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);
+               ret = syscall(__NR_init_module, data, (unsigned long) s.st_size, options);
        else
-               LOG("failed to read full module %s\n", path);
+               ERROR("failed to read full module %s\n", path);
 
        close(fd);
        free(data);
@@ -430,7 +509,7 @@ static void load_moddeps(struct module *_m)
                m = find_module(dep);
 
                if (!m)
-                       LOG("failed to find dependency %s\n", dep);
+                       ERROR("failed to find dependency %s\n", dep);
                if (m && (m->state != LOADED)) {
                        m->state = PROBE;
                        load_moddeps(m);
@@ -455,7 +534,7 @@ static int load_modprobe(void)
                todo = 0;
                avl_for_each_element(&modules, m, avl) {
                        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++;
@@ -475,14 +554,14 @@ static int load_modprobe(void)
 
 static int print_insmod_usage(void)
 {
-       LOG("Usage:\n\tinsmod filename [args]\n");
+       INFO("Usage:\n\tinsmod filename [args]\n");
 
        return -1;
 }
 
 static int print_usage(char *arg)
 {
-       LOG("Usage:\n\t%s module\n", arg);
+       INFO("Usage:\n\t%s module\n", arg);
 
        return -1;
 }
@@ -497,7 +576,7 @@ static int main_insmod(int argc, char **argv)
 
        name = get_module_name(argv[1]);
        if (!name) {
-               LOG("cannot find module - %s\n", argv[1]);
+               ERROR("cannot find module - %s\n", argv[1]);
                return -1;
        }
 
@@ -505,7 +584,7 @@ static int main_insmod(int argc, char **argv)
                return -1;
 
        if (find_module(name)) {
-               LOG("module is already loaded - %s\n", name);
+               ERROR("module is already loaded - %s\n", name);
                return -1;
 
        }
@@ -526,11 +605,18 @@ static int main_insmod(int argc, char **argv)
                cur += sprintf(cur, "%s", argv[i]);
        }
 
+       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);
+               return -1;
+       }
+
        ret = insert_module(get_module_path(name), options);
        free(options);
 
        if (ret)
-               LOG("failed to insert %s\n", get_module_path(name));
+               ERROR("failed to insert %s\n", get_module_path(name));
 
        return ret;
 }
@@ -550,15 +636,15 @@ static int main_rmmod(int argc, char **argv)
        name = get_module_name(argv[1]);
        m = find_module(name);
        if (!m) {
-               LOG("module is not loaded\n");
+               ERROR("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)
-               LOG("unloading the module failed\n");
+               ERROR("unloading the module failed\n");
+
+       free_modules();
 
        return ret;
 }
@@ -583,18 +669,29 @@ static int main_lsmod(int argc, char **argv)
 
 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) {
+               ERROR("cannot find module - %s\n", argv[1]);
+               return -1;
+       }
+
+       name = get_module_path(m->name);
+       if (!name) {
+               ERROR("cannot find path of module - %s\n", m->name);
                return -1;
        }
 
-       print_modinfo(module);
+       print_modinfo(name);
 
        return 0;
 }
@@ -610,16 +707,16 @@ static int main_modprobe(int argc, char **argv)
        if (scan_loaded_modules())
                return -1;
 
-       if (scan_module_folder())
+       if (scan_module_folders())
                return -1;
 
        name = get_module_name(argv[1]);
        m = find_module(name);
        if (m && m->state == LOADED) {
-               LOG("%s is already loaded\n", name);
+               ERROR("%s is already loaded\n", name);
                return -1;
        } else if (!m) {
-               LOG("failed to find a module named %s\n", name);
+               ERROR("failed to find a module named %s\n", name);
        } else {
                int fail;
 
@@ -628,12 +725,12 @@ static int main_modprobe(int argc, char **argv)
                fail = load_modprobe();
 
                if (fail) {
-                       LOG("%d module%s could not be probed\n",
+                       ERROR("%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);
+                                       ERROR("- %s\n", m->name);
                }
        }
 
@@ -654,9 +751,6 @@ static int main_loader(int argc, char **argv)
        if (argc > 1)
                dir = argv[1];
 
-       if (argc > 2)
-               prefix = argv[2];
-
        path = malloc(strlen(dir) + 2);
        strcpy(path, dir);
        strcat(path, "*");
@@ -664,7 +758,7 @@ static int main_loader(int argc, char **argv)
        if (scan_loaded_modules())
                return -1;
 
-       if (scan_module_folder())
+       if (scan_module_folders())
                return -1;
 
        syslog(0, "kmodloader: loading kernel modules from %s\n", path);
@@ -678,7 +772,7 @@ static int main_loader(int argc, char **argv)
                char *mod = NULL;
 
                if (!fp) {
-                       LOG("failed to open %s\n", gl.gl_pathv[j]);
+                       ERROR("failed to open %s\n", gl.gl_pathv[j]);
                        continue;
                }
 
@@ -698,6 +792,8 @@ static int main_loader(int argc, char **argv)
                        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();
@@ -708,15 +804,15 @@ static int main_loader(int argc, char **argv)
        }
 
        fail = load_modprobe();
-       LOG("ran %d iterations\n", iterations);
+       DEBUG("ran %d iterations\n", iterations);
 
        if (fail) {
-               LOG("%d module%s could not be probed\n",
+               ERROR("%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));
+                               ERROR("- %s - %d\n", m->name, deps_available(m, 1));
        }
 
 out: