X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;ds=sidebyside;f=modutils%2Fdepmod.c;h=a4474d5e4a96a7ab7b4687fd8100c8dcece95b48;hb=15437e3e2a0cc9e4ba25066fd562b2862d38799b;hp=34483dc07e4f14fc83ab60959bf6d37e4c5775af;hpb=1ea25684694721226997c04bd79d51f1f4d774b1;p=oweals%2Fbusybox.git

diff --git a/modutils/depmod.c b/modutils/depmod.c
index 34483dc07..a4474d5e4 100644
--- a/modutils/depmod.c
+++ b/modutils/depmod.c
@@ -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,179 +12,203 @@
 #define _GNU_SOURCE
 #include <libbb.h>
 #include <sys/utsname.h> /* uname() */
+#include "modutils.h"
 
-#ifndef DEFAULT_MODULES_DIR
-#define DEFAULT_MODULES_DIR "/lib/modules"
-#endif
-#ifndef DEFAULT_DEPMOD_FILE
-#define DEFAULT_DEPMOD_FILE "modules.dep"
-#endif
 /*
  * Theory of operation:
  * - iterate over all modules and record their full path
  * - 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;
+
+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)
 {
-	llist_add_to(&G.lst, xstrdup(modulename));
+	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, *ptr;
-	int fd;
-	char *depends, *deps;
+	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.
- */
-	if (last_char_is(fname, 'o') == NULL) /* not a module */
-		goto skip;
+	for (m = modules; m != NULL; m = m->next)
+		if (strcmp(m->modname, modname) == 0)
+			return m;
+	return NULL;
+}
 
-	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");
+static void order_dep_list(module_info *modules, module_info *start,
+			   llist_t *add)
+{
+	module_info *m;
+	llist_t *n;
 
-	ptr = the_module;
+	for (n = add; n != NULL; n = n->link) {
+		m = find_module(modules, n->data);
+		if (m == NULL)
+			continue;
 
-	fprintf((FILE*)data, "\n%s:", fname);
-//bb_info_msg("fname='%s'", fname);
-	do {
-		/* search for a 'd' */
-		ptr = memchr(ptr, 'd', len);
-		if (ptr == NULL) /* no d left, done */
-			goto done;
-		if (memcmp(ptr, "depends=", sizeof("depends=")-1) == 0)
-			break;
-		len -= ++ptr - the_module;
-	} while (1);
-	deps = depends = xstrdup (ptr + sizeof("depends=")-1);
-//bb_info_msg(" depends='%s'", depends);
-	while (*deps) {
-		llist_t * _lst = G.lst;
-		char *buf1;
-
-		ptr = strchr(deps, ',');
-		if (ptr != NULL)
-			*(char*)ptr = '\0';
-		/* remember the length of the current dependency plus eventual 0 byte */
-		len = strlen(deps) + (ptr != NULL);
-		buf1 = xmalloc(len + 3);
-		sprintf(buf1, "/%s.", deps); /* make sure we match the correct file */
-		while (_lst) {
-			ptr = strstr(_lst->data, buf1);
-			if (ptr != NULL)
-				break; /* found it */
-			_lst = _lst->link;
-		}
-		free(buf1);
-		if (_lst /*&& _lst->data*/) {
-//bb_info_msg("[%s] -> '%s'", deps, _lst->data);
-			fprintf((FILE*)data, " %s", _lst->data);
-			deps += len;
-		}
+		/* 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);
-done:
-	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 retval = EXIT_SUCCESS;
-	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;
-	if (*argv) {/* got a version to use? */
-		chp = *argv++;
-//		if (memchr(chp, '/', strlen(chp)) != NULL) /* XXX: drop this */
-//			bb_show_usage();
+
+	/* 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");
-		chp = xstrdup(uts.release);
+		uname(&uts);
+		xchdir(uts.release);
 	}
-	/* if no modules are given on the command-line, -a is on per default */
+	/* If no modules are given on the command-line, -a is on per default.  */
 	option_mask32 |= *argv == NULL;
 
-	moddir = concat_path_file(DEFAULT_MODULES_DIR, chp);
-//	if (ENABLE_FEATURE_CLEAN_UP)
-//		free(chp);
-	if (option_mask32 & ARG_b) {
-		char *old_moddir = moddir;
-		moddir = concat_path_file(moddir_base, moddir);
-		if (ENABLE_FEATURE_CLEAN_UP)
-			free(old_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, DEFAULT_DEPMOD_FILE);
-		filedes = xfopen(chp, "w");
-		if (ENABLE_FEATURE_CLEAN_UP)
-			free(chp);
+#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);
+		}
 	}
-	/* 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)) {
-		retval = EXIT_FAILURE;
-	} else
-	do {
-		chp = concat_path_file(option_mask32 & ARG_a ?  moddir : moddir_base,
-				option_mask32 & ARG_a ? "" : *argv++);
-
-		if (!recursive_action(chp,
-				ACTION_RECURSE, /* flags */
-				fileAction, /* file action */
-				NULL, /* dir action */
-				(void*)filedes, /* user data */
-				0)) { /* depth */
-			retval = 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);
 		}
-		if (ENABLE_FEATURE_CLEAN_UP)
-			free(chp);
-	} while (!(option_mask32 & ARG_a) && *argv);
+	}
+#endif
 
 	if (ENABLE_FEATURE_CLEAN_UP) {
-		fclose(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 retval;
+
+	return EXIT_SUCCESS;
 }