add support for module handling
authorJohn Crispin <blogic@openwrt.org>
Mon, 13 May 2013 11:54:06 +0000 (13:54 +0200)
committerJohn Crispin <blogic@openwrt.org>
Tue, 4 Jun 2013 14:14:18 +0000 (16:14 +0200)
Signed-off-by: John Crispin <blogic@openwrt.org>
kmodloader.c

index 62b2d5bcaa4cd32b4f3ac032e597471e3c2a27ec..d72a1f452287e09a886792548eba24727e4e6778 100644 (file)
@@ -14,6 +14,9 @@
 
 #define _GNU_SOURCE
 #include <sys/syscall.h>
+#include <sys/mman.h>
+#include <sys/utsname.h>
+
 #include <stdlib.h>
 #include <unistd.h>
 #include <sys/syscall.h>
 #include <fcntl.h>
 #include <syslog.h>
 #include <glob.h>
-#include <sys/utsname.h>
+#include <elf.h>
+
+#include <libubox/list.h>
+
+#define DEF_MOD_PATH "/lib/modules/%s/"
+
+enum {
+       SCANNED,
+       PROBE,
+       LOADED,
+       FAILED,
+};
+
+struct module {
+       struct list_head list;
+
+       char *name;
+       char *depends;
 
-#define DEF_MOD_PATH "/lib/modules/%s/%s.ko"
-static int insmod(char *module, const char *options)
+       int size;
+       int usage;
+       int state;
+};
+
+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 void free_module(struct module *m)
+{
+       if (m->name)
+               free(m->name);
+       if (m->depends)
+               free(m->depends);
+       free(m);
+}
+
+static void free_modules(void)
+{
+       struct list_head *p, *n;
+
+       list_for_each_safe(p, n, &modules) {
+               struct module *m = container_of(p, struct module, list);
+               list_del(p);
+               free_module(m);
+       }
+}
+
+static char* get_module_path(char *name)
+{
+       static char path[256];
        struct utsname ver;
-       char path[256];
-       void *data = 0;
        struct stat s;
-       int fd, ret = -1;
+       char *t;
+
+       if (!stat(name, &s))
+               return name;
 
        uname(&ver);
-       snprintf(path, 256, DEF_MOD_PATH, ver.release, module);
+       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);
+
+       if (!stat(path, &s))
+               return path;
+
+       return NULL;
+}
+
+static char* get_module_name(char *path)
+{
+       static char name[32];
+       char *t;
+
+       strncpy(name, basename(path), sizeof(name));
+
+       t = strstr(name, ".ko");
+       if (t)
+               *t = '\0';
+       t = name;
+       while (t && *t) {
+               if (*t == '-')
+                       *t = '_';
+               t++;
+       }
+
+       return name;
+}
+
+#if __WORDSIZE == 64
+static int elf_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
+{
+       const char *secnames;
+       Elf64_Ehdr *e;
+       Elf64_Shdr *sh;
+       int i;
+
+       e = (Elf64_Ehdr *) map;
+       sh = (Elf64_Shdr *) (map + e->e_shoff);
+
+       secnames = map + sh[e->e_shstrndx].sh_offset;
+       for (i = 0; i < e->e_shnum; i++) {
+               if (!strcmp(section, secnames + sh[i].sh_name)) {
+                       *size = sh[i].sh_size;
+                       *offset = sh[i].sh_offset;
+                       return 0;
+               }
+       }
+
+       return -1;
+}
+#else
+static int elf_find_section(char *map, const char *section, unsigned int *offset, unsigned int *size)
+{
+       const char *secnames;
+       Elf32_Ehdr *e;
+       Elf32_Shdr *sh;
+       int i;
+
+       e = (Elf32_Ehdr *) map;
+       sh = (Elf32_Shdr *) (map + e->e_shoff);
+
+       secnames = map + sh[e->e_shstrndx].sh_offset;
+       for (i = 0; i < e->e_shnum; i++) {
+               if (!strcmp(section, secnames + sh[i].sh_name)) {
+                       *size = sh[i].sh_size;
+                       *offset = sh[i].sh_offset;
+                       return 0;
+               }
+       }
+
+       return -1;
+}
+#endif
+
+static int scan_loaded_modules(void)
+{
+       FILE *fp = fopen("/proc/modules", "r");
+       char buf[256];
+
+       if (!fp) {
+               fprintf(stderr, "failed to open /proc/modules\n");
+               return -1;
+       }
+
+       while (fgets(buf, sizeof(buf), fp)) {
+               struct module m;
+               struct module *n;
+
+               m.name = strtok(buf, " ");
+               m.size = atoi(strtok(NULL, " "));
+               m.usage = atoi(strtok(NULL, " "));
+               m.depends = strtok(NULL, " ");
+
+               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->usage = m.usage;
+               n->state = LOADED;
+
+               list_add_tail(&n->list, &modules);
+       }
+
+       return 0;
+}
+
+static struct module* get_module_info(char *module)
+{
+       int fd = open(module, O_RDONLY);
+       unsigned int offset, size;
+       char *map, *strings;
+       struct module *m;
+       struct stat s;
+
+       if (!fd) {
+               fprintf(stderr, "failed to open %s\n", module);
+               return NULL;
+       }
+
+       if (fstat(fd, &s) == -1) {
+               fprintf(stderr, "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);
+               return NULL;
+       }
+
+       if (elf_find_section(map, ".modinfo", &offset, &size)) {
+               fprintf(stderr, "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;
+
+               while (!strings[0])
+                       strings++;
+               sep = strstr(strings, "=");
+               if (!sep)
+                       break;
+               len = sep - strings;
+               sep++;
+               if (!strncmp(strings, "depends=", len + 1))
+                       m->depends = strdup(sep);
+               strings = &sep[strlen(sep)];
+       }
+
+       m->state = SCANNED;
+
+       return m;
+}
+
+static int scan_module_folder(char *dir)
+{
+       int gl_flags = GLOB_NOESCAPE | GLOB_MARK;
+       int j;
+       glob_t gl;
+
+       if (glob(dir, gl_flags, NULL, &gl) < 0)
+               return -1;
+
+       for (j = 0; j < gl.gl_pathc; j++) {
+               char *name = get_module_name(gl.gl_pathv[j]);
+               struct module *m;
+
+               if (!name)
+                       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);
+               }
+       }
+
+       globfree(&gl);
+
+       return 0;
+}
+
+static int print_modinfo(char *module)
+{
+       int fd = open(module, O_RDONLY);
+       unsigned int offset, size;
+       struct stat s;
+       char *map, *strings;
+
+       if (!fd) {
+               fprintf(stderr, "failed to open %s\n", module);
+               return -1;
+       }
+
+       if (fstat(fd, &s) == -1) {
+               fprintf(stderr, "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);
+               return -1;
+       }
+
+       if (elf_find_section(map, ".modinfo", &offset, &size)) {
+               fprintf(stderr, "failed to load the .modinfo section from %s\n", module);
+               return -1;
+       }
+
+       strings = map + offset;
+       printf("module:\t\t%s\n", module);
+       while (strings && (strings < map + offset + size)) {
+               char *dup = NULL;
+               char *sep;
+
+               while (!strings[0])
+                       strings++;
+               sep = strstr(strings, "=");
+               if (!sep)
+                       break;
+               dup = strndup(strings, sep - strings);
+               sep++;
+               if (strncmp(strings, "parm", 4)) {
+                       if (strlen(dup) < 7)
+                               printf("%s:\t\t%s\n",  dup, sep);
+                       else
+                               printf("%s:\t%s\n",  dup, sep);
+               }
+               strings = &sep[strlen(sep)];
+               if (dup)
+                       free(dup);
+       }
+
+       return 0;
+}
+
+static int insert_module(char *path, const char *options)
+{
+       void *data = 0;
+       struct stat s;
+       int fd, ret = -1;
 
        if (stat(path, &s)) {
                fprintf(stderr, "missing module %s\n", path);
@@ -55,7 +382,7 @@ static int insmod(char *module, const char *options)
        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 insert %s\n", module);
+                       fprintf(stderr, "failed to insert %s\n", path);
        } else {
                fprintf(stderr, "failed to read full module %s\n", path);
        }
@@ -66,24 +393,220 @@ static int insmod(char *module, const char *options)
        return ret;
 }
 
-/*static void rmmod(char *module)
+static int deps_available(struct module *m)
 {
-       syscall(__NR_delete_module, module, 0);
-}*/
+       char *deps = m->depends;
+       char *comma;
 
-int main(int argc, char **argv)
+       if (!strcmp(deps, "-"))
+               return 0;
+       while (*deps && (NULL != ((comma = strstr(deps, ","))))) {
+               *comma = '\0';
+
+               m = find_module(deps);
+
+               if (!m || (m->state != LOADED))
+                       return -1;
+
+               deps = ++comma;
+       }
+
+       return 0;
+}
+
+static int load_depmod(void)
+{
+       int loaded, todo;
+       struct module *m;
+
+       do {
+               loaded = 0;
+               todo = 0;
+               list_for_each_entry(m, &modules, list) {
+                       if ((m->state == PROBE) && (!deps_available(m))) {
+                               if (!insert_module(get_module_path(m->name), "")) {
+                                       m->state = LOADED;
+                                       loaded++;
+                                       continue;
+                               }
+                               m->state = FAILED;
+                       } else if (m->state == PROBE) {
+                               todo++;
+                       }
+               }
+//             printf("loaded %d modules this pass\n", loaded);
+       } while (loaded);
+
+//     printf("missing todos %d\n", todo);
+
+       return -todo;
+}
+
+static int print_insmod_usage(void)
+{
+       fprintf(stderr, "Usage:\n\tinsmod filename [args]\n");
+
+       return -1;
+}
+
+static int print_usage(char *arg)
+{
+       fprintf(stderr, "Usage:\n\t%s module\n", arg);
+
+       return -1;
+}
+
+static int main_insmod(int argc, char **argv)
+{
+       char options[256] = "";
+       char *name;
+       int i;
+
+       if (argc < 2)
+               return print_insmod_usage();
+
+       name = get_module_name(argv[1]);
+       if (!name) {
+               fprintf(stderr, "cannot find module - %s\n", argv[1]);
+               return -1;
+       }
+
+       if (scan_loaded_modules())
+               return -1;
+
+       if (find_module(name)) {
+               fprintf(stderr, "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;
+               }
+
+       return insert_module(get_module_path(name), options);
+}
+
+static int main_rmmod(int argc, char **argv)
+{
+       struct module *m;
+       char *name;
+       int ret;
+
+       if (argc != 2)
+               return print_usage("rmmod");
+
+       if (scan_loaded_modules())
+               return -1;
+
+       name = get_module_name(argv[1]);
+       m = find_module(name);
+       if (!m) {
+               fprintf(stderr, "module is not loaded\n");
+               return -1;
+       }
+       free_modules();
+
+       ret = syscall(__NR_delete_module, name, 0);
+
+       if (ret)
+               fprintf(stderr, "unloading the module failed\n");
+
+       return ret;
+}
+
+static int main_lsmod(int argc, char **argv)
+{
+       struct module *m;
+
+       if (scan_loaded_modules())
+               return -1;
+
+       list_for_each_entry(m, &modules, list)
+               if (m->state == LOADED)
+                       printf("%-20s%8d%3d %s\n",
+                               m->name, m->size, m->usage,
+                               (*m->depends == '-') ? ("") : (m->depends));
+
+       free_modules();
+
+       return 0;
+}
+
+static int main_modinfo(int argc, char **argv)
+{
+       char *module;
+
+       if (argc != 2)
+               return print_usage("modinfo");
+
+       module = get_module_path(argv[1]);
+       if (!module) {
+               fprintf(stderr, "cannot find module - %s\n", argv[1]);
+               return -1;
+       }
+
+       print_modinfo(module);
+
+       return 0;
+}
+
+static int main_depmod(int argc, char **argv)
+{
+       struct utsname ver;
+       struct module *m;
+       char path[128];
+       char *name;
+
+       if (argc != 2)
+               return print_usage("depmod");
+
+       if (scan_loaded_modules())
+               return -1;
+
+       uname(&ver);
+       snprintf(path, sizeof(path), DEF_MOD_PATH "*.ko", ver.release);
+
+       scan_module_folder(path);
+
+       name = get_module_name(argv[1]);
+       m = find_module(name);
+       if (m && m->state == LOADED) {
+               fprintf(stderr, "%s is already loaded\n", name);
+               return -1;
+       } else if (!m) {
+               fprintf(stderr, "failed to find a module named %s\n", name);
+       } else {
+               m->state = PROBE;
+               load_depmod();
+       }
+
+       free_modules();
+
+       return 0;
+}
+
+static int main_loader(int argc, char **argv)
 {
-       glob_t gl;
        int gl_flags = GLOB_NOESCAPE | GLOB_MARK;
-       char *tmp = malloc(256);
        char *dir = "/etc/modules.d/*";
+       glob_t gl;
+       char *path;
 
        if (argc > 1)
                dir = argv[1];
 
-       syslog(0, "kmodloader: loading kernel modules from %s\n", dir);
+       path = malloc(strlen(dir) + 2);
+       strcpy(path, dir);
+       strcat(path, "*");
 
-       if (glob(dir, gl_flags, NULL, &gl) >= 0) {
+       syslog(0, "kmodloader: loading kernel modules from %s\n", path);
+
+       if (glob(path, gl_flags, NULL, &gl) >= 0) {
                int j;
 
                for (j = 0; j < gl.gl_pathc; j++) {
@@ -92,11 +615,20 @@ int main(int argc, char **argv)
                        if (!fp) {
                                fprintf(stderr, "failed to open %s\n", gl.gl_pathv[j]);
                        } else {
-                               char mod[64];
+                               char mod[256];
+
+                               while (fgets(mod, sizeof(mod), fp)) {
+                                       char *nl = strchr(mod, '\n');
+                                       char *opts;
+
+                                       if (nl)
+                                               *nl = '\0';
+
+                                       opts = strchr(mod, ' ');
+                                       if (opts)
+                                               *opts++ = '\0';
 
-                               while (fgets(mod, 64, fp)) {
-                                       mod[strlen(mod) - 1] = '\0';
-                                       insmod(mod, "");
+                                       insert_module(get_module_path(mod), (opts) ? (opts) : (""));
                                }
                                fclose(fp);
                        }
@@ -104,7 +636,29 @@ int main(int argc, char **argv)
        }
 
        globfree(&gl);
-       free(tmp);
+       free(path);
 
        return 0;
 }
+
+int main(int argc, char **argv)
+{
+       char *exec = basename(*argv);
+
+       if (!strcmp(exec, "insmod"))
+               return main_insmod(argc, argv);
+
+       if (!strcmp(exec, "rmmod"))
+               return main_rmmod(argc, argv);
+
+       if (!strcmp(exec, "lsmod"))
+               return main_lsmod(argc, argv);
+
+       if (!strcmp(exec, "modinfo"))
+               return main_modinfo(argc, argv);
+
+       if (!strcmp(exec, "depmod"))
+               return main_depmod(argc, argv);
+
+       return main_loader(argc, argv);
+}