X-Git-Url: http://git.archive.openwrt.org/?p=project%2Fubox.git;a=blobdiff_plain;f=kmodloader.c;h=1b6488f0ff4b8f28f4039346660d01afac58c12d;hp=04d7c1d307c8fa14ab09d5199c822ea518b07053;hb=HEAD;hpb=de1dc9d1dc652171b2c019760701fa2283faacde diff --git a/kmodloader.c b/kmodloader.c index 04d7c1d..1b6488f 100644 --- a/kmodloader.c +++ b/kmodloader.c @@ -27,7 +27,6 @@ #include #include #include -#include #include #include #include @@ -35,21 +34,9 @@ #include #include #include +#include -#define DEF_MOD_PATH "/lib/modules/%s/" - -#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) - +#define DEF_MOD_PATH "/modules/%s/" enum { SCANNED, @@ -58,8 +45,6 @@ enum { }; struct module { - struct avl_node avl; - char *name; char *depends; char *opts; @@ -68,49 +53,114 @@ struct module { 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, m, avl, tmp) - free(m); + avl_remove_all_elements(&modules, mn, avl, tmp) { + struct module *m = mn->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) @@ -166,22 +216,54 @@ static int elf32_find_section(char *map, const char *section, unsigned int *offs 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); - ERROR("unknown elf format %d\n", clazz); + 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, @@ -189,7 +271,7 @@ alloc_module(const char *name, const char *depends, int size) if (!m) return NULL; - m->avl.key = m->name = strcpy(_name, name); + m->name = strcpy(_name, name); m->opts = 0; if (depends) { @@ -200,13 +282,23 @@ alloc_module(const char *name, const char *depends, int size) _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; @@ -215,7 +307,7 @@ static int scan_loaded_modules(void) fp = fopen("/proc/modules", "r"); if (!fp) { - ERROR("failed to open /proc/modules\n"); + ULOG_ERR("failed to open /proc/modules\n"); return -1; } @@ -231,7 +323,11 @@ static int scan_loaded_modules(void) 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// */ + n = alloc_module(m.name, NULL, 0, m.depends, m.size); + } n->usage = m.usage; n->state = LOADED; } @@ -245,38 +341,42 @@ 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, *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) { - ERROR("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) { - ERROR("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) { - ERROR("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)) { - ERROR("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; @@ -284,29 +384,46 @@ static struct module* get_module_info(const char *module, const char *name) 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); - m->state = SCANNED; + if (m) + m->state = SCANNED; + +out: + if (map != MAP_FAILED) + munmap(map, s.st_size); + + if (fd >= 0) + close(fd); + + 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(prefix) + strlen(ver.release) + 1); - sprintf(path, "%s" DEF_MOD_PATH "*.ko", prefix, ver.release); + path = alloca(strlen(dir) + sizeof("*.ko") + 1); + sprintf(path, "%s*.ko", dir); if (glob(path, gl_flags, NULL, &gl) < 0) return -1; @@ -319,13 +436,29 @@ static int scan_module_folder(void) 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) @@ -333,37 +466,40 @@ 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) { - ERROR("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) { - ERROR("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) { - ERROR("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)) { - ERROR("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; @@ -380,7 +516,16 @@ static int print_modinfo(char *module) 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) @@ -388,7 +533,7 @@ 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; @@ -397,9 +542,9 @@ static int deps_available(struct module *m, int verbose) m = find_module(dep); if (verbose && !m) - ERROR("missing dependency %s\n", dep); + ULOG_ERR("missing dependency %s\n", dep); if (verbose && m && (m->state != LOADED)) - ERROR("dependency not loaded %s\n", dep); + ULOG_ERR("dependency not loaded %s\n", dep); if (!m || (m->state != LOADED)) err++; dep += strlen(dep) + 1; @@ -415,22 +560,31 @@ static int insert_module(char *path, const char *options) int fd, ret = -1; if (stat(path, &s)) { - ERROR("missing module %s\n", path); + ULOG_ERR("missing module %s\n", path); return ret; } fd = open(path, O_RDONLY); - if (!fd) { - ERROR("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) + 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 - ERROR("failed to read full module %s\n", path); + ULOG_ERR("failed to read full module %s\n", path); +out: close(fd); free(data); @@ -451,7 +605,7 @@ static void load_moddeps(struct module *_m) m = find_module(dep); if (!m) - ERROR("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); @@ -465,16 +619,24 @@ static int iterations = 0; 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), (m->opts) ? (m->opts) : (""))) { m->state = LOADED; @@ -496,14 +658,21 @@ static int load_modprobe(void) static int print_insmod_usage(void) { - INFO("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) { - INFO("Usage:\n\t%s module\n", arg); + ULOG_INFO("Usage:\n\t%s module\n", arg); return -1; } @@ -518,7 +687,7 @@ static int main_insmod(int argc, char **argv) name = get_module_name(argv[1]); if (!name) { - ERROR("cannot find module - %s\n", argv[1]); + ULOG_ERR("cannot find module - %s\n", argv[1]); return -1; } @@ -526,7 +695,7 @@ static int main_insmod(int argc, char **argv) return -1; if (find_module(name)) { - ERROR("module is already loaded - %s\n", name); + ULOG_ERR("module is already loaded - %s\n", name); return -1; } @@ -537,6 +706,12 @@ static int main_insmod(int argc, char **argv) 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++) { @@ -547,19 +722,26 @@ static int main_insmod(int argc, char **argv) cur += sprintf(cur, "%s", argv[i]); } + 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); - return -1; + ret = -1; + goto err; } ret = insert_module(get_module_path(name), options); - free(options); - if (ret) - ERROR("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; } @@ -578,13 +760,13 @@ static int main_rmmod(int argc, char **argv) name = get_module_name(argv[1]); m = find_module(name); if (!m) { - ERROR("module is not loaded\n"); + ULOG_ERR("module is not loaded\n"); return -1; } ret = syscall(__NR_delete_module, m->name, 0); if (ret) - ERROR("unloading the module failed\n"); + ULOG_ERR("unloading the module failed\n"); free_modules(); @@ -593,16 +775,32 @@ static int main_rmmod(int argc, char **argv) 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(); @@ -617,19 +815,19 @@ static int main_modinfo(int argc, char **argv) if (argc != 2) return print_usage("modinfo"); - if (scan_module_folder()) + 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]); + ULOG_ERR("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); + ULOG_ERR("cannot find path of module - %s\n", m->name); return -1; } @@ -640,25 +838,45 @@ static int main_modinfo(int argc, char **argv) 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) { - ERROR("%s is already loaded\n", name); - return -1; + if (!quiet) + ULOG_ERR("%s is already loaded\n", name); + return 0; } else if (!m) { - ERROR("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; @@ -667,12 +885,16 @@ static int main_modprobe(int argc, char **argv) fail = load_modprobe(); if (fail) { - ERROR("%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) - ERROR("- %s\n", m->name); + ULOG_ERR("- %s\n", m->name); + } } } @@ -684,7 +906,8 @@ static int main_modprobe(int argc, char **argv) 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; @@ -693,20 +916,26 @@ 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); + 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; @@ -717,7 +946,7 @@ static int main_loader(int argc, char **argv) char *mod = NULL; if (!fp) { - ERROR("failed to open %s\n", gl.gl_pathv[j]); + ULOG_ERR("failed to open %s\n", gl.gl_pathv[j]); continue; } @@ -749,15 +978,20 @@ static int main_loader(int argc, char **argv) } fail = load_modprobe(); - DEBUG("ran %d iterations\n", iterations); if (fail) { - ERROR("%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)) - ERROR("- %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: @@ -767,20 +1001,23 @@ 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) @@ -803,5 +1040,6 @@ 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); }