libbb: add xgetgrnam too. ~0 code size change
[oweals/busybox.git] / modutils / depmod.c
index e061501f6d722f76bf6b45ec930f737e85ac91af..a4474d5e4a96a7ab7b4687fd8100c8dcece95b48 100644 (file)
@@ -1,7 +1,9 @@
 /* vi: set sw=4 ts=4: */
 /*
  * depmod - generate modules.dep
- * Copyright (c) 2008 Bernhard Fischer
+ * Copyright (c) 2008 Bernhard Reutner-Fischer
+ * Copyrihgt (c) 2008 Timo Teras <timo.teras@iki.fi>
+ * Copyright (c) 2008 Vladimir Dronnikov
  *
  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
  */
@@ -10,6 +12,7 @@
 #define _GNU_SOURCE
 #include <libbb.h>
 #include <sys/utsname.h> /* uname() */
+#include "modutils.h"
 
 /*
  * Theory of operation:
  * - iterate over all modules looking for "depends=" entries
  *   for each depends, look through our list of full paths and emit if found
  */
-struct globals {
-       llist_t *lst; /* modules without their corresponding extension */
-       size_t moddir_base_len; /* length of the "-b basedir" */
+
+typedef struct module_info {
+       struct module_info *next;
+       char *name, *modname;
+       llist_t *dependencies;
+       llist_t *aliases;
+       llist_t *symbols;
+       struct module_info *dnext, *dprev;
+} module_info;
+
+enum {
+       ARG_a = (1<<0), /* All modules, ignore mods in argv */
+       ARG_A = (1<<1), /* Only emit .ko that are newer than modules.dep file */
+       ARG_b = (1<<2), /* not /lib/modules/$(uname -r)/ but this base-dir */
+       ARG_e = (1<<3), /* with -F, print unresolved symbols */
+       ARG_F = (1<<4), /* System.map that contains the symbols */
+       ARG_n = (1<<5)  /* dry-run, print to stdout only */
 };
-#define G (*(struct globals*)&bb_common_bufsiz1)
-/* We have to zero it out because of NOEXEC */
-#define INIT_G() memset(&G, 0, sizeof(G))
 
-static int fill_lst(const char *modulename, struct stat ATTRIBUTE_UNUSED *sb,
-                                       void ATTRIBUTE_UNUSED *data, int ATTRIBUTE_UNUSED depth)
+static int FAST_FUNC parse_module(const char *fname, struct stat *sb,
+                                 void *data, int UNUSED_PARAM depth)
 {
-       /* We get a file here. If the file does not have ".ko" but an
-        * intermittent dentry has, it's just their fault.
-        */
-       if (strrstr(modulename, ".ko") != NULL)
-               llist_add_to(&G.lst, xstrdup(modulename + G.moddir_base_len));
+       module_info **first = (module_info **) data;
+       char *image, *ptr;
+       module_info *info;
+       size_t len = sb->st_size;
+
+       if (strrstr(fname, ".ko") == NULL)
+               return TRUE;
+
+       image = xmalloc_open_zipped_read_close(fname, &len);
+       info = xzalloc(sizeof(module_info));
+
+       info->next = *first;
+       *first = info;
+
+       info->dnext = info->dprev = info;
+       info->name = xstrdup(fname);
+       info->modname = filename2modname(fname, NULL);
+       for (ptr = image; ptr < image + len - 10; ptr++) {
+               if (strncmp(ptr, "depends=", 8) == 0) {
+                       char *u;
+
+                       ptr += 8;
+                       for (u = ptr; *u; u++)
+                               if (*u == '-')
+                                       *u = '_';
+                       ptr += string_to_llist(ptr, &info->dependencies, ",");
+               } else if (ENABLE_FEATURE_MODUTILS_ALIAS &&
+                          strncmp(ptr, "alias=", 6) == 0) {
+                       llist_add_to(&info->aliases, xstrdup(ptr + 6));
+                       ptr += strlen(ptr);
+               } else if (ENABLE_FEATURE_MODUTILS_SYMBOLS &&
+                          strncmp(ptr, "__ksymtab_", 10) == 0) {
+                       ptr += 10;
+                       if (strncmp(ptr, "gpl", 3) == 0 ||
+                           strcmp(ptr, "strings") == 0)
+                               continue;
+                       llist_add_to(&info->symbols, xstrdup(ptr));
+                       ptr += strlen(ptr);
+               }
+       }
+       free(image);
+
        return TRUE;
 }
 
-static int fileAction(const char *fname, struct stat *sb,
-                                       void *data, int ATTRIBUTE_UNUSED depth)
+static module_info *find_module(module_info *modules, const char *modname)
 {
-       size_t len = sb->st_size;
-       void *the_module;
-       char *ptr;
-       int fd;
-       char *depends, *deps;
-
-       if (strrstr(fname, ".ko") == NULL) /* not a module */
-               goto skip;
+       module_info *m;
 
-/*XXX: FIXME: does not handle compressed modules!
- * There should be a function that looks at the extension and sets up
- * open_transformer for us.
- */
-       fd = xopen(fname, O_RDONLY);
-       the_module = mmap(NULL, len, PROT_READ, MAP_SHARED
-#if defined MAP_POPULATE
-                                               |MAP_POPULATE
-#endif
-                                               , fd, 0);
-       close(fd);
-       if (the_module == MAP_FAILED)
-               bb_perror_msg_and_die("mmap");
-
-       ptr = the_module;
+       for (m = modules; m != NULL; m = m->next)
+               if (strcmp(m->modname, modname) == 0)
+                       return m;
+       return NULL;
+}
 
-       fprintf((FILE*)data, "%s:", fname + G.moddir_base_len);
-//bb_info_msg("fname='%s'", fname + G.moddir_base_len);
-       do {
-               /* search for a 'd' */
-               ptr = memchr(ptr, 'd', len - (ptr - (char*)the_module));
-               if (ptr == NULL) /* no d left, done */
-                       goto none;
-               if (strncmp(ptr, "depends=", sizeof("depends=")-1) == 0)
-                       break;
-               ++ptr;
-       } while (1);
-       deps = depends = xstrdup (ptr + sizeof("depends=")-1);
-//bb_info_msg(" depends='%s'", depends);
-       while (deps) {
-               llist_t * _lst = G.lst;
-
-               ptr = strsep(&deps, ",");
-               while (_lst) {
-                       /* Compare the recorded filenames ignoring ".ko*" at the end.  */
-                       char *tmp = bb_get_last_path_component_nostrip(_lst->data);
-                       if (strncmp(ptr, tmp, strrstr(tmp, ".ko") - tmp) == 0)
-                               break; /* found it */
-                       _lst = _lst->link;
-               }
-               if (_lst) {
-//bb_info_msg("[%s] -> '%s'", (char*)ptr, _lst->data);
-                       fprintf((FILE*)data, " %s", _lst->data);
-               }
+static void order_dep_list(module_info *modules, module_info *start,
+                          llist_t *add)
+{
+       module_info *m;
+       llist_t *n;
+
+       for (n = add; n != NULL; n = n->link) {
+               m = find_module(modules, n->data);
+               if (m == NULL)
+                       continue;
+
+               /* unlink current entry */
+               m->dnext->dprev = m->dprev;
+               m->dprev->dnext = m->dnext;
+
+               /* and add it to tail */
+               m->dnext = start;
+               m->dprev = start->dprev;
+               start->dprev->dnext = m;
+               start->dprev = m;
+
+               /* recurse */
+               order_dep_list(modules, start, m->dependencies);
        }
-       free(depends);
-       fprintf((FILE*)data, "\n");
- none:
-       munmap(the_module, sb->st_size);
- skip:
-       return TRUE;
 }
 
 int depmod_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
-int depmod_main(int ATTRIBUTE_UNUSED argc, char **argv)
+int depmod_main(int argc UNUSED_PARAM, char **argv)
 {
-       int ret;
-       char *moddir_base = NULL, *moddir, *system_map, *chp;
-       FILE *filedes = stdout;
-       enum {
-               ARG_a = (1<<0), /* All modules, ignore mods in argv */
-               ARG_A = (1<<1), /* Only emit .ko that are newer than modules.dep file */
-               ARG_b = (1<<2), /* not /lib/modules/$(uname -r)/ but this base-dir */
-               ARG_e = (1<<3), /* with -F, print unresolved symbols */
-               ARG_F = (1<<4), /* System.map that contains the symbols */
-               ARG_n = (1<<5)  /* dry-run, print to stdout only */
-       };
-
-       getopt32(argv, "aAb:eF:n", &moddir_base, &system_map);
+       module_info *modules = NULL, *m, *dep;
+       char *moddir_base = (char *)CONFIG_DEFAULT_MODULES_DIR;
+       int tmp;
+
+       getopt32(argv, "aAb:eF:n", &moddir_base, NULL);
        argv += optind;
 
-       /* got a version to use? */
-       if (*argv && (sscanf(*argv, "%d.%d.%d", &ret, &ret, &ret) == 3)) {
-               moddir = concat_path_file(CONFIG_DEFAULT_MODULES_DIR, *argv++);
+       /* goto modules location */
+
+       /* If a version is provided, then that kernel version's module directory
+        * is used, rather than the current kernel version (as returned by
+        * "uname -r").  */
+       xchdir(moddir_base);
+       if (*argv && (sscanf(*argv, "%d.%d.%d", &tmp, &tmp, &tmp) == 3)) {
+               xchdir(*argv++);
        } else {
                struct utsname uts;
-               if (uname(&uts) < 0)
-                       bb_simple_perror_msg_and_die("uname");
-               moddir = concat_path_file(CONFIG_DEFAULT_MODULES_DIR, uts.release);
+               uname(&uts);
+               xchdir(uts.release);
        }
        /* If no modules are given on the command-line, -a is on per default.  */
        option_mask32 |= *argv == NULL;
 
-       if (option_mask32 & ARG_b) {
-               G.moddir_base_len = strlen(moddir_base);
-               if (ENABLE_FEATURE_CLEAN_UP) {
-                       chp = moddir;
-                       moddir = concat_path_file(moddir_base, moddir);
-                       free (chp);
-               } else
-                       moddir = concat_path_file(moddir_base, moddir);
+       /* Scan modules */
+       moddir_base = xrealloc_getcwd_or_warn(NULL);
+       do {
+               recursive_action((option_mask32 & ARG_a) ? moddir_base : *argv,
+                               ACTION_RECURSE, parse_module, NULL,  &modules, 0);
+       } while (!(option_mask32 & ARG_a) && *(++argv));
+       if (ENABLE_FEATURE_CLEAN_UP)
+               free(moddir_base);
+
+       /* Generate dependency and alias files */
+       if (!(option_mask32 & ARG_n))
+               freopen(CONFIG_DEFAULT_DEPMOD_FILE, "w", stdout);
+       for (m = modules; m != NULL; m = m->next) {
+               printf("%s:", m->name);
+
+               order_dep_list(modules, m, m->dependencies);
+               while (m->dnext != m) {
+                       dep = m->dnext;
+                       printf(" %s", dep->name);
+
+                       /* unlink current entry */
+                       dep->dnext->dprev = dep->dprev;
+                       dep->dprev->dnext = dep->dnext;
+                       dep->dnext = dep->dprev = dep;
+               }
+               puts("");
        }
 
-       if (!(option_mask32 & ARG_n)) { /* --dry-run */
-               chp = concat_path_file(moddir, CONFIG_DEFAULT_DEPMOD_FILE);
-               filedes = xfopen(chp, "w");
-               if (ENABLE_FEATURE_CLEAN_UP)
-                       free(chp);
-       }
-       ret = EXIT_SUCCESS;
-       /* We have to do a full walk to collect all needed data.  */
-       if (!recursive_action(moddir,
-                       ACTION_RECURSE, /* flags */
-                       fill_lst, /* file action */
-                       NULL, /* dir action */
-                       NULL, /* user data */
-                       0)) { /* depth */
-               if (ENABLE_FEATURE_CLEAN_UP)
-                       ret = EXIT_FAILURE;
-               else
-                       return EXIT_FAILURE;
+#if ENABLE_FEATURE_MODUTILS_ALIAS
+       if (!(option_mask32 & ARG_n))
+               freopen("modules.alias", "w", stdout);
+       for (m = modules; m != NULL; m = m->next) {
+               while (m->aliases) {
+                       printf("alias %s %s\n",
+                               (char*)llist_pop(&m->aliases),
+                               m->modname);
+               }
        }
-       do {
-               chp = option_mask32 & ARG_a ? moddir : *argv++;
-
-               if (!recursive_action(chp,
-                               ACTION_RECURSE, /* flags */
-                               fileAction, /* file action */
-                               NULL, /* dir action */
-                               (void*)filedes, /* user data */
-                               0)) { /* depth */
-                       ret = EXIT_FAILURE;
+#endif
+#if ENABLE_FEATURE_MODUTILS_SYMBOLS
+       if (!(option_mask32 & ARG_n))
+               freopen("modules.symbols", "w", stdout);
+       for (m = modules; m != NULL; m = m->next) {
+               while (m->symbols) {
+                       printf("alias symbol:%s %s\n",
+                               (char*)llist_pop(&m->symbols),
+                               m->modname);
                }
-       } while (!(option_mask32 & ARG_a) && *argv);
+       }
+#endif
 
        if (ENABLE_FEATURE_CLEAN_UP) {
-               fclose_if_not_stdin(filedes);
-               llist_free(G.lst, free);
-               free(moddir);
+               while (modules) {
+                       module_info *old = modules;
+                       modules = modules->next;
+                       free(old->name);
+                       free(old->modname);
+                       free(old);
+               }
        }
-       return ret;
+
+       return EXIT_SUCCESS;
 }