use modutils for non Intel arch's

1 files changed, 339 insertions, 0 deletions

diff --git a/mdk-stage1/insmod-modutils/util/meta_expand.c b/mdk-stage1/insmod-modutils/util/meta_expand.c
new file mode 100644
index 000000000..41fb4024c
--- /dev/null
+++ b/mdk-stage1/insmod-modutils/util/meta_expand.c
@@ -0,0 +1,339 @@
+/*
+ * Handle expansion of meta charaters
+ *
+ * Copyright 1999 Björn Ekwall <bj0rn@blox.se>
+ *
+ * "kernelversion" idea from the Debian release via:
+ *	Wichert Akkerman <wakkerma@cs.leidenuniv.nl>
+ *
+ * Use wordexp(): idea from Tim Waugh <tim@cyberelk.demon.co.uk>
+ *
+ * Alpha typecast: Michal Jaegermann <michal@ellpspace.math.ualberta.ca>
+ *
+ * This file is part of the Linux modutils.
+ *
+ * This program is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the
+ * Free Software Foundation; either version 2 of the License, or (at your
+ * option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software Foundation,
+ * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ */
+
+#ifdef HAVE_WORDEXP
+#undef HAVE_WORDEXP
+#define HAVE_WORDEXP 0
+#endif
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <limits.h>
+#include <string.h>
+#include <ctype.h>
+#if HAVE_WORDEXP
+#include <wordexp.h>
+#elif HAVE_GLOB
+#include <glob.h>
+#endif
+#include "util.h"
+
+/*
+ * Split into words delimited by whitespace,
+ * handle remaining quotes though...
+ * If strip_quotes != 0 then strip one level of quotes from the line.
+ */
+static void split_line(GLOB_LIST *g, char *line, int strip_quotes)
+{
+	int len;
+	char *d;
+	char *e;
+	char *p;
+	char tmpline[PATH_MAX];
+
+	for (p = line; *p; p = e) {
+		/* Skip leading whitespace */
+		while (*p && isspace(*p))
+			++p;
+
+		/* find end of word */
+		d = tmpline;
+		for (e = p; *e && !(isspace(*e)); ++e) {
+			char match;
+
+			/* Quote handling */
+			switch (*e) {
+			case '\\':
+				if (!strip_quotes)
+					*d++ = *e;
+				break;
+
+			case '"':
+			case '\'':
+				match = *e;
+				if (!strip_quotes)
+					*d++ = *e;
+				for (++e; *e && *e != match; ++e) {
+					*d++ = *e;
+					if (*e == '\\' && *(e + 1) == match)
+						*d++ = *++e;
+				}
+				if (!strip_quotes)
+					*d++ = *e;
+				break;
+
+			default:
+				*d++ = *e;
+				break;
+			}
+		}
+
+		if ((len = (int)(d - tmpline)) > 0) {
+			char *str = xmalloc(len + 1);
+			strncpy(str, tmpline, len);
+			str[len] = '\0';
+			g->pathv = (char **)xrealloc(g->pathv,
+				   (g->pathc + 2) * sizeof(char *));
+			g->pathv[g->pathc++] = str;
+		}
+	}
+
+	if (g->pathc)
+		g->pathv[g->pathc] = NULL;
+}
+
+static int glob_it(char *pt, GLOB_LIST *g)
+{
+#if HAVE_WORDEXP
+	wordexp_t w;
+
+	memset(&w, 0, sizeof(w));
+	if (wordexp(pt, &w, WRDE_UNDEF)) {
+		/*
+		error("wordexp %s failed", pt);
+		*/
+		return -1;
+	}
+	/* else */
+	g->pathc = w.we_wordc;
+	g->pathv = w.we_wordv;
+
+	return 0;
+#elif HAVE_GLOB /* but not wordexp */
+	glob_t w;
+
+	memset(&w, 0, sizeof(w));
+	if (glob(pt, GLOB_NOSORT, NULL, &w)) {
+		/*
+		error("glob %s failed", pt);
+		*/
+		return -1;
+	}
+	/* else */
+	if (w.gl_pathc && strpbrk(w.gl_pathv[0], SHELL_META)) {
+		globfree(&w);
+		return -1;
+	}
+	g->pathc = w.gl_pathc;
+	g->pathv = w.gl_pathv;
+
+	return 0;
+#else /* Neither wordexp nor glob */
+	return -1;
+#endif
+}
+
+/*
+ * Expand the string (including meta-character) to a list of matches
+ *
+ * Return 0 if OK else -1
+ */
+int meta_expand(char *pt, GLOB_LIST *g, char *base_dir, char *version, int type)
+{
+	FILE *fin;
+	int len = 0;
+	char *line = NULL;
+	char *p, *p1;
+	char tmpline[PATH_MAX + 1];
+	char wrk[sizeof(tmpline)];
+	char tmpcmd[2*sizeof(tmpline)+20];	/* room for /bin/echo "text" */
+
+	g->pathc = 0;
+	g->pathv = NULL;
+
+	/*
+	 * Take care of version dependent expansions
+	 * Needed for forced version handling
+	 */
+	if ((p = strchr(pt, '`')) != NULL && (type & ME_BUILTIN_COMMAND)) {
+		do {
+			char *s;
+
+			for (s = p + 1; isspace(*s); ++s)
+				;
+
+			if (strncmp(s, "uname -r", 8) == 0) {
+				while (*s && (*s != '`'))
+					++s;
+				if (*s == '`') {
+					*p = '\0';
+					snprintf(wrk, sizeof(wrk), "%s%s%s",
+						     pt,
+						     version,
+						     s + 1);
+					*p = '`';
+				}
+				strcpy(tmpline, wrk);	/* safe, same size */
+				pt = tmpline;
+			} else if (strncmp(s, "kernelversion", 13) == 0) {
+				while (*s && (*s != '`'))
+					++s;
+				if (*s == '`') {
+					int n;
+					char *k;
+
+					*p = '\0';
+					for (n = 0, k = version; *k; ++k) {
+						if (*k == '.' && ++n == 2)
+							break;
+					}
+					snprintf(wrk, sizeof(wrk), "%s%.*s%s",
+						     pt,
+						     /* typecast for Alpha */
+						     (int)(k - version),
+						     version,
+						     s + 1);
+					*p = '`';
+					strcpy(tmpline, wrk);	/* safe, same size */
+					pt = tmpline;
+				}
+			} else
+				break;
+		} while ((p = strchr(pt, '`')) != NULL);
+	}
+
+	/*
+	 * Any remaining meta-chars?
+	 */
+	if (strpbrk(pt, SHELL_META) == NULL) {
+		/*
+		 * No meta-chars.
+		 * Split into words, delimited by whitespace.
+		 */
+		snprintf(wrk, sizeof(wrk), "%s%s", (base_dir ? base_dir : ""), pt);
+		strcpy(tmpline, wrk);	/* safe, same size */
+		if ((p = strtok(tmpline, " \t\n")) != NULL) {
+			while (p) {
+				g->pathv = (char **)xrealloc(g->pathv,
+					   (g->pathc + 2) * sizeof(char *));
+				g->pathv[g->pathc++] = xstrdup(p);
+				p = strtok(NULL, " \t\n");
+			}
+		}
+		if (g->pathc)
+			g->pathv[g->pathc] = NULL;
+		return 0;
+	}
+	/* else */
+	/*
+	 * Handle remaining meta-chars
+	 */
+
+	/*
+	 * Just plain quotes?
+	 */
+	if (strpbrk(pt, "&();|<>$`!{}[]~=+:?*") == NULL &&
+	    (p = strpbrk(pt, "\"'\\"))) {
+		split_line(g, pt, 1);
+		return 0;
+	}
+
+	if (strpbrk(pt, "&();|<>$`\"'\\!{}~+:[]~?*") == NULL) {
+		/* Only "=" remaining, should be module options */
+		split_line(g, pt, 0);
+		return 0;
+	}
+
+	/*
+	 * If there are meta-characters and
+	 * if they are only shell glob meta-characters: do globbing
+	 */
+#if HAVE_WORDEXP
+	if (strpbrk(pt, "&();|<>`\"'\\!{}~=+:") == NULL &&
+	    strpbrk(pt, "$[]~?*"))
+#else
+	if (strpbrk(pt, "&();|<>$`\"'\\!{}~=+:") == NULL &&
+	    strpbrk(pt, "[]~?*"))
+#endif
+		if ((type & ME_GLOB) && glob_it(pt, g) == 0)
+			return 0;
+
+	if (strpbrk(pt, "&();|<>$`\"'\\!{}~+:[]~?*") == NULL) {
+		/* Only "=" remaining, should be module options */
+		split_line(g, pt, 0);
+		return 0;
+	}
+
+	/*
+	 * Last resort: Use "echo".
+	 * DANGER: Applying shell expansion to user supplied input is a
+	 *         major security risk.  Modutils code should only do meta
+	 *         expansion via shell commands for trusted data.  Basically
+	 *         this means only for data in the config file.   Even that
+	 *         assumes that the user cannot run modprobe as root with
+	 *         their own config file.  Programs (including the kernel)
+	 *         that invoke modprobe as root with user supplied input must
+	 *         pass exactly one user supplied parameter and must set
+	 *         safe mode.
+	 */
+	if (!(type & ME_SHELL_COMMAND))
+		return 0;
+	snprintf(wrk, sizeof(wrk), "%s%s", (base_dir ? base_dir : ""), pt);
+	strcpy(tmpline, wrk);	/* safe, same size */
+	snprintf(tmpcmd, sizeof(tmpcmd), "/bin/echo \"");
+	for (p = tmpline, p1 = tmpcmd + strlen(tmpcmd); *p; ++p, ++p1) {
+		if (*p == '"' || *p == '\\')
+			*p1++ = '\\';
+		*p1 = *p;
+	}
+	*p1++ = '"';
+	*p1++ = '\0';
+	if (p1 - tmpcmd > sizeof(tmpcmd)) {
+		error("tmpcmd overflow, should never happen");
+		exit(1);
+	}
+	if ((fin = popen(tmpcmd, "r")) == NULL) {
+		error("Can't execute: %s", tmpcmd);
+		return -1;
+	}
+	/* else */
+
+	/*
+	 * Collect the result
+	 */
+	while (fgets(tmpcmd, PATH_MAX, fin) != NULL) {
+		int l = strlen(tmpcmd);
+
+		line = (char *)xrealloc(line, len + l + 1);
+		line[len] = '\0';
+		strcat(line + len, tmpcmd);	/* safe, realloc */
+		len += l;
+	}
+	pclose(fin);
+
+	if (line) {
+		/* shell used to strip one set of quotes.  Paranoia code in
+		 * 2.3.20 stops that strip so we do it ourselves.
+		 */
+		split_line(g, line, 1);
+		free(line);
+	}
+
+	return 0;
+}