X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=modutils%2Fmodprobe.c;h=1a4f5d4d42c60f404a4a316ef46919cf1c9ff373;hb=29ec0b94a4da0eb92e9994fed181e895e3fb2910;hp=0d9ea24d0d08f9ef5f99d00bba1cca045793e453;hpb=beaef16315166deec3ee4eba425f4f58542c9491;p=oweals%2Fbusybox.git diff --git a/modutils/modprobe.c b/modutils/modprobe.c index 0d9ea24d0..1a4f5d4d4 100644 --- a/modutils/modprobe.c +++ b/modutils/modprobe.c @@ -4,51 +4,45 @@ * * Copyright (c) 2002 by Robert Griebl, griebl@gmx.de * Copyright (c) 2003 by Andrew Dennison, andrew.dennison@motec.com.au + * Copyright (c) 2005 by Jim Bauer, jfbauer@nfr.com * - * 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 + * Portions Copyright (c) 2005 by Yann E. MORIN, yann.morin.1998@anciens.enib.fr * + * Licensed under GPLv2 or later, see file LICENSE in this tarball for details. */ +#include "libbb.h" #include -#include -#include -#include -#include -#include -#include -#include -#include "busybox.h" +#include +#define line_buffer bb_common_bufsiz1 +struct mod_opt_t { /* one-way list of options to pass to a module */ + char * m_opt_val; + struct mod_opt_t * m_next; +}; -struct dep_t { - char * m_module; - char * m_options; +struct dep_t { /* one-way list of dependency rules */ + /* a dependency rule */ + char * m_name; /* the module name*/ + char * m_path; /* the module file path */ + struct mod_opt_t * m_options; /* the module options */ - int m_isalias : 1; - int m_reserved : 15; + unsigned int m_isalias :1; /* the module is an alias */ + unsigned int m_isblacklisted:1; /* the module is blacklisted */ + unsigned int m_reserved :14; /* stuffin' */ - int m_depcnt : 16; - char ** m_deparr; + unsigned int m_depcnt :16; /* the number of dependable module(s) */ + char ** m_deparr; /* the list of dependable module(s) */ - struct dep_t * m_next; + struct dep_t * m_next; /* the next dependency rule */ }; -struct mod_list_t { - char * m_module; - char * m_options; +struct mod_list_t { /* two-way list of modules to process */ + /* a module description */ + const char * m_name; + char * m_path; + struct mod_opt_t * m_options; struct mod_list_t * m_prev; struct mod_list_t * m_next; @@ -56,23 +50,44 @@ struct mod_list_t { static struct dep_t *depend; -static int autoclean, show_only, quiet, do_syslog, verbose; -static int k_version; -int parse_tag_value ( char *buffer, char **ptag, char **pvalue ) +#define MAIN_OPT_STR "acdklnqrst:vVC:" +#define INSERT_ALL 1 /* a */ +#define DUMP_CONF_EXIT 2 /* c */ +#define D_OPT_IGNORED 4 /* d */ +#define AUTOCLEAN_FLG 8 /* k */ +#define LIST_ALL 16 /* l */ +#define SHOW_ONLY 32 /* n */ +#define QUIET 64 /* q */ +#define REMOVE_OPT 128 /* r */ +#define DO_SYSLOG 256 /* s */ +#define RESTRICT_DIR 512 /* t */ +#define VERBOSE 1024 /* v */ +#define VERSION_ONLY 2048 /* V */ +#define CONFIG_FILE 4096 /* C */ + +#define autoclean (option_mask32 & AUTOCLEAN_FLG) +#define show_only (option_mask32 & SHOW_ONLY) +#define quiet (option_mask32 & QUIET) +#define remove_opt (option_mask32 & REMOVE_OPT) +#define do_syslog (option_mask32 & DO_SYSLOG) +#define verbose (option_mask32 & VERBOSE) + +static int parse_tag_value(char *buffer, char **ptag, char **pvalue) { char *tag, *value; - while ( isspace ( *buffer )) - buffer++; + buffer = skip_whitespace(buffer); tag = value = buffer; - while ( !isspace ( *value )) - if (!*value) return 0; - else value++; - *value++ = 0; - while ( isspace ( *value )) + while (!isspace(*value)) { + if (!*value) + return 0; value++; - if (!*value) return 0; + } + *value++ = '\0'; + value = skip_whitespace(value); + if (!*value) + return 0; *ptag = tag; *pvalue = value; @@ -80,594 +95,819 @@ int parse_tag_value ( char *buffer, char **ptag, char **pvalue ) return 1; } -/* Jump through hoops to simulate how fgets() grabs just one line at a - * time... Don't use any stdio since modprobe gets called from a kernel - * thread and stdio junk can overflow the limited stack... +/* + * This function appends an option to a list */ -static char *reads ( int fd, char *buffer, size_t len ) +static struct mod_opt_t *append_option(struct mod_opt_t *opt_list, char *opt) { - int n = read ( fd, buffer, len ); + struct mod_opt_t *ol = opt_list; - if ( n > 0 ) { - char *p; + if (ol) { + while (ol->m_next) { + ol = ol->m_next; + } + ol->m_next = xzalloc(sizeof(struct mod_opt_t)); + ol = ol->m_next; + } else { + ol = opt_list = xzalloc(sizeof(struct mod_opt_t)); + } - buffer [len-1] = 0; - p = strchr ( buffer, '\n' ); + ol->m_opt_val = xstrdup(opt); + /*ol->m_next = NULL; - done by xzalloc*/ - if ( p ) { - off_t offset; + return opt_list; +} - offset = lseek ( fd, 0L, SEEK_CUR ); // Get the current file descriptor offset - lseek ( fd, offset-n + (p-buffer) + 1, SEEK_SET ); // Set the file descriptor offset to right after the \n +#if ENABLE_FEATURE_MODPROBE_MULTIPLE_OPTIONS +/* static char* parse_command_string(char* src, char **dst); + * src: pointer to string containing argument + * dst: pointer to where to store the parsed argument + * return value: the pointer to the first char after the parsed argument, + * NULL if there was no argument parsed (only trailing spaces). + * Note that memory is allocated with xstrdup when a new argument was + * parsed. Don't forget to free it! + */ +#define ARG_EMPTY 0x00 +#define ARG_IN_DQUOTES 0x01 +#define ARG_IN_SQUOTES 0x02 +static char *parse_command_string(char *src, char **dst) +{ + int opt_status = ARG_EMPTY; + char* tmp_str; + + /* Dumb you, I have nothing to do... */ + if (src == NULL) return src; - p[1] = 0; + /* Skip leading spaces */ + while (*src == ' ') { + src++; + } + /* Is the end of string reached? */ + if (*src == '\0') { + return NULL; + } + /* Reached the start of an argument + * By the way, we duplicate a little too much + * here but what is too much is freed later. */ + *dst = tmp_str = xstrdup(src); + /* Get to the end of that argument */ + while (*tmp_str != '\0' + && (*tmp_str != ' ' || (opt_status & (ARG_IN_DQUOTES | ARG_IN_SQUOTES))) + ) { + switch (*tmp_str) { + case '\'': + if (opt_status & ARG_IN_DQUOTES) { + /* Already in double quotes, keep current char as is */ + } else { + /* shift left 1 char, until end of string: get rid of the opening/closing quotes */ + memmove(tmp_str, tmp_str + 1, strlen(tmp_str)); + /* mark me: we enter or leave single quotes */ + opt_status ^= ARG_IN_SQUOTES; + /* Back one char, as we need to re-scan the new char there. */ + tmp_str--; + } + break; + case '"': + if (opt_status & ARG_IN_SQUOTES) { + /* Already in single quotes, keep current char as is */ + } else { + /* shift left 1 char, until end of string: get rid of the opening/closing quotes */ + memmove(tmp_str, tmp_str + 1, strlen(tmp_str)); + /* mark me: we enter or leave double quotes */ + opt_status ^= ARG_IN_DQUOTES; + /* Back one char, as we need to re-scan the new char there. */ + tmp_str--; + } + break; + case '\\': + if (opt_status & ARG_IN_SQUOTES) { + /* Between single quotes: keep as is. */ + } else { + switch (*(tmp_str+1)) { + case 'a': + case 'b': + case 't': + case 'n': + case 'v': + case 'f': + case 'r': + case '0': + /* We escaped a special character. For now, keep + * both the back-slash and the following char. */ + tmp_str++; + src++; + break; + default: + /* We escaped a space or a single or double quote, + * or a back-slash, or a non-escapable char. Remove + * the '\' and keep the new current char as is. */ + memmove(tmp_str, tmp_str + 1, strlen(tmp_str)); + break; + } + } + break; + /* Any other char that is special shall appear here. + * Example: $ starts a variable + case '$': + do_variable_expansion(); + break; + * */ + default: + /* any other char is kept as is. */ + break; } - return buffer; + tmp_str++; /* Go to next char */ + src++; /* Go to next char to find the end of the argument. */ + } + /* End of string, but still no ending quote */ + if (opt_status & (ARG_IN_DQUOTES | ARG_IN_SQUOTES)) { + bb_error_msg_and_die("unterminated (single or double) quote in options list: %s", src); } + *tmp_str++ = '\0'; + *dst = xrealloc(*dst, (tmp_str - *dst)); + return src; +} +#else +#define parse_command_string(src, dst) (0) +#endif /* ENABLE_FEATURE_MODPROBE_MULTIPLE_OPTIONS */ - else - return 0; +static int is_conf_command(char *buffer, const char *command) +{ + int len = strlen(command); + return ((strstr(buffer, command) == buffer) && + isspace(buffer[len])); +} + +/* + * This function reads aliases and default module options from a configuration file + * (/etc/modprobe.conf syntax). It supports includes (only files, no directories). + */ +static void include_conf(struct dep_t **first, struct dep_t **current, char *buffer, int buflen, int fd) +{ + int continuation_line = 0; + + // alias parsing is not 100% correct (no correct handling of continuation lines within an alias)! + + while (reads(fd, buffer, buflen)) { + int l; + + *strchrnul(buffer, '#') = '\0'; + + l = strlen(buffer); + + while (l && isspace(buffer[l-1])) { + buffer[l-1] = '\0'; + l--; + } + + if (l == 0) { + continuation_line = 0; + continue; + } + + if (continuation_line) + continue; + + if (is_conf_command(buffer, "alias")) { + char *alias, *mod; + + if (parse_tag_value(buffer + 6, &alias, &mod)) { + /* handle alias as a module dependent on the aliased module */ + if (!*current) { + (*first) = (*current) = xzalloc(sizeof(struct dep_t)); + } else { + (*current)->m_next = xzalloc(sizeof(struct dep_t)); + (*current) = (*current)->m_next; + } + (*current)->m_name = xstrdup(alias); + (*current)->m_isalias = 1; + + if ((strcmp(mod, "off") == 0) || (strcmp(mod, "null") == 0)) { + /*(*current)->m_depcnt = 0; - done by xzalloc */ + /*(*current)->m_deparr = 0;*/ + } else { + (*current)->m_depcnt = 1; + (*current)->m_deparr = xmalloc(sizeof(char *)); + (*current)->m_deparr[0] = xstrdup(mod); + } + /*(*current)->m_next = NULL; - done by xzalloc */ + } + } else if (is_conf_command(buffer, "options")) { + char *mod, *opt; + + /* split the line in the module/alias name, and options */ + if (parse_tag_value(buffer + 8, &mod, &opt)) { + struct dep_t *dt; + + /* find the corresponding module */ + for (dt = *first; dt; dt = dt->m_next) { + if (strcmp(dt->m_name, mod) == 0) + break; + } + if (dt) { + if (ENABLE_FEATURE_MODPROBE_MULTIPLE_OPTIONS) { + char* new_opt = NULL; + while ((opt = parse_command_string(opt, &new_opt))) { + dt->m_options = append_option(dt->m_options, new_opt); + } + } else { + dt->m_options = append_option(dt->m_options, opt); + } + } + } + } else if (is_conf_command(buffer, "include")) { + int fdi; + char *filename; + + filename = skip_whitespace(buffer + 8); + fdi = open(filename, O_RDONLY); + if (fdi >= 0) { + include_conf(first, current, buffer, buflen, fdi); + close(fdi); + } + } else if (ENABLE_FEATURE_MODPROBE_BLACKLIST && + (is_conf_command(buffer, "blacklist"))) { + char *mod; + struct dep_t *dt; + + mod = skip_whitespace(buffer + 10); + for (dt = *first; dt; dt = dt->m_next) { + if (strcmp(dt->m_name, mod) == 0) + break; + } + if (dt) + dt->m_isblacklisted = 1; + } + } /* while (reads(...)) */ } -static struct dep_t *build_dep ( void ) +/* + * This function builds a list of dependency rules from /lib/modules/`uname -r`/modules.dep. + * It then fills every modules and aliases with their default options, found by parsing + * modprobe.conf (or modules.conf, or conf.modules). + */ +static struct dep_t *build_dep(void) { int fd; struct utsname un; - struct dep_t *first = 0; - struct dep_t *current = 0; - char buffer[2048]; - char *filename = buffer; + struct dep_t *first = NULL; + struct dep_t *current = NULL; + char *filename; int continuation_line = 0; + int k_version; - k_version = 0; - if ( uname ( &un )) - return 0; + if (uname(&un)) + bb_error_msg_and_die("can't determine kernel version"); - // check for buffer overflow in following code - if ( bb_strlen ( un.release ) > ( sizeof( buffer ) - 64 )) { - return 0; - } + k_version = 0; if (un.release[0] == '2') { k_version = un.release[2] - '0'; } - strcpy ( filename, "/lib/modules/" ); - strcat ( filename, un.release ); - strcat ( filename, "/modules.dep" ); - - if (( fd = open ( filename, O_RDONLY )) < 0 ) { - + filename = xasprintf(CONFIG_DEFAULT_MODULES_DIR"/%s/"CONFIG_DEFAULT_DEPMOD_FILE, un.release); + fd = open(filename, O_RDONLY); + if (ENABLE_FEATURE_CLEAN_UP) + free(filename); + if (fd < 0) { /* Ok, that didn't work. Fall back to looking in /lib/modules */ - if (( fd = open ( "/lib/modules/modules.dep", O_RDONLY )) < 0 ) { - return 0; + fd = open(CONFIG_DEFAULT_MODULES_DIR"/"CONFIG_DEFAULT_DEPMOD_FILE, O_RDONLY); + if (fd < 0) { + bb_error_msg_and_die("cannot parse " CONFIG_DEFAULT_DEPMOD_FILE); } } - while ( reads ( fd, buffer, sizeof( buffer ))) { - int l = bb_strlen ( buffer ); + while (reads(fd, line_buffer, sizeof(line_buffer))) { + int l = strlen(line_buffer); char *p = 0; - while ( isspace ( buffer [l-1] )) { - buffer [l-1] = 0; + while (l > 0 && isspace(line_buffer[l-1])) { + line_buffer[l-1] = '\0'; l--; } - if ( l == 0 ) { + if (l == 0) { continuation_line = 0; continue; } - if ( !continuation_line ) { - char *col = strchr ( buffer, ':' ); + /* Is this a new module dep description? */ + if (!continuation_line) { + /* find the dep beginning */ + char *col = strchr(line_buffer, ':'); + char *dot = col; - if ( col ) { - char *mods; + if (col) { + /* This line is a dep description */ + const char *mods; + char *modpath; char *mod; - int ext = 0; - - *col = 0; - mods = strrchr ( buffer, '/' ); - - if ( !mods ) - mods = buffer; - else - mods++; - -#if defined(CONFIG_FEATURE_2_6_MODULES) - if ((k_version > 4) && ( *(col-3) == '.' ) && - ( *(col-2) == 'k' ) && ( *(col-1) == 'o' )) - ext = 3; - else -#endif - if (( *(col-2) == '.' ) && ( *(col-1) == 'o' )) - ext = 2; - - mod = bb_xstrndup ( buffer, col - buffer ); - if ( !current ) { - first = current = (struct dep_t *) xmalloc ( sizeof ( struct dep_t )); - } - else { - current-> m_next = (struct dep_t *) xmalloc ( sizeof ( struct dep_t )); - current = current-> m_next; + /* Find the beginning of the module file name */ + *col = '\0'; + mods = bb_basename(line_buffer); + + /* find the path of the module */ + modpath = strchr(line_buffer, '/'); /* ... and this is the path */ + if (!modpath) + modpath = line_buffer; /* module with no path */ + /* find the end of the module name in the file name */ + if (ENABLE_FEATURE_2_6_MODULES && + (k_version > 4) && (col[-3] == '.') && + (col[-2] == 'k') && (col[-1] == 'o')) + dot = col - 3; + else if ((col[-2] == '.') && (col[-1] == 'o')) + dot = col - 2; + + mod = xstrndup(mods, dot - mods); + + /* enqueue new module */ + if (!current) { + first = current = xzalloc(sizeof(struct dep_t)); + } else { + current->m_next = xzalloc(sizeof(struct dep_t)); + current = current->m_next; } - current-> m_module = mod; - current-> m_options = 0; - current-> m_isalias = 0; - current-> m_depcnt = 0; - current-> m_deparr = 0; - current-> m_next = 0; - - //printf ( "%s:\n", mod ); - p = col + 1; - } - else - p = 0; - } - else - p = buffer; - - while ( p && *p && isblank(*p)) - p++; + current->m_name = mod; + current->m_path = xstrdup(modpath); + /*current->m_options = NULL; - xzalloc did it*/ + /*current->m_isalias = 0;*/ + /*current->m_depcnt = 0;*/ + /*current->m_deparr = 0;*/ + /*current->m_next = 0;*/ - if ( p && *p ) { - char *end = &buffer [l-1]; - char *deps; + p = col + 1; + } else + /* this line is not a dep description */ + p = NULL; + } else + /* It's a dep description continuation */ + p = line_buffer; + + /* p points to the first dependable module; if NULL, no dependable module */ + if (p && (p = skip_whitespace(p))[0] != '\0') { + char *end = &line_buffer[l-1]; + const char *deps; char *dep; char *next; int ext = 0; - while ( isblank ( *end ) || ( *end == '\\' )) + while (isblank(*end) || (*end == '\\')) end--; - do - { - next = strchr (p, ' ' ); - if (next) - { - *next = 0; + do { + /* search the end of the dependency */ + next = strchr(p, ' '); + if (next) { + *next = '\0'; next--; - } - else + } else next = end; - deps = strrchr ( p, '/' ); - - if ( !deps || ( deps < p )) { - deps = p; + /* find the beginning of the module file name */ + deps = bb_basename(p); + if (deps == p) + deps = skip_whitespace(deps); - while ( isblank ( *deps )) - deps++; - } - else - deps++; - -#if defined(CONFIG_FEATURE_2_6_MODULES) - if ((k_version > 4) && ( *(next-2) == '.' ) && *(next-1) == 'k' && - ( *next == 'o' )) + /* find the end of the module name in the file name */ + if (ENABLE_FEATURE_2_6_MODULES + && (k_version > 4) && (next[-2] == '.') + && (next[-1] == 'k') && (next[0] == 'o')) ext = 3; - else -#endif - if (( *(next-1) == '.' ) && ( *next == 'o' )) - ext = 2; + else if ((next[-1] == '.') && (next[0] == 'o')) + ext = 2; /* Cope with blank lines */ if ((next-deps-ext+1) <= 0) continue; - dep = bb_xstrndup ( deps, next - deps - ext + 1 ); + dep = xstrndup(deps, next - deps - ext + 1); - current-> m_depcnt++; - current-> m_deparr = (char **) xrealloc ( current-> m_deparr, - sizeof ( char *) * current-> m_depcnt ); - current-> m_deparr [current-> m_depcnt - 1] = dep; + /* Add the new dependable module name */ + current->m_deparr = xrealloc_vector(current->m_deparr, 2, current->m_depcnt); + current->m_deparr[current->m_depcnt++] = dep; - //printf ( " %d) %s\n", current-> m_depcnt, current-> m_deparr [current-> m_depcnt -1] ); p = next + 2; } while (next < end); } - if ( buffer [l-1] == '\\' ) - continuation_line = 1; - else - continuation_line = 0; + /* is there other dependable module(s) ? */ + continuation_line = (line_buffer[l-1] == '\\'); + } /* while (reads(...)) */ + close(fd); + + /* + * First parse system-specific options and aliases + * as they take precedence over the kernel ones. + * >=2.6: we only care about modprobe.conf + * <=2.4: we care about modules.conf and conf.modules + */ + if (ENABLE_FEATURE_2_6_MODULES + && (fd = open("/etc/modprobe.conf", O_RDONLY)) < 0) + if (ENABLE_FEATURE_2_4_MODULES + && (fd = open("/etc/modules.conf", O_RDONLY)) < 0) + if (ENABLE_FEATURE_2_4_MODULES) + fd = open("/etc/conf.modules", O_RDONLY); + + if (fd >= 0) { + include_conf(&first, ¤t, line_buffer, sizeof(line_buffer), fd); + close(fd); } - close ( fd ); - - // alias parsing is not 100% correct (no correct handling of continuation lines within an alias) ! - -#if defined(CONFIG_FEATURE_2_6_MODULES) - if (( fd = open ( "/etc/modprobe.conf", O_RDONLY )) < 0 ) -#endif - if (( fd = open ( "/etc/modules.conf", O_RDONLY )) < 0 ) - if (( fd = open ( "/etc/conf.modules", O_RDONLY )) < 0 ) - return first; - - continuation_line = 0; - while ( reads ( fd, buffer, sizeof( buffer ))) { - int l; - char *p; - - p = strchr ( buffer, '#' ); - if ( p ) - *p = 0; - l = bb_strlen ( buffer ); - - while ( l && isspace ( buffer [l-1] )) { - buffer [l-1] = 0; - l--; + /* Only 2.6 has a modules.alias file */ + if (ENABLE_FEATURE_2_6_MODULES) { + /* Parse kernel-declared module aliases */ + filename = xasprintf(CONFIG_DEFAULT_MODULES_DIR"/%s/modules.alias", un.release); + fd = open(filename, O_RDONLY); + if (fd < 0) { + /* Ok, that didn't work. Fall back to looking in /lib/modules */ + fd = open(CONFIG_DEFAULT_MODULES_DIR"/modules.alias", O_RDONLY); } + if (ENABLE_FEATURE_CLEAN_UP) + free(filename); - if ( l == 0 ) { - continuation_line = 0; - continue; + if (fd >= 0) { + include_conf(&first, ¤t, line_buffer, sizeof(line_buffer), fd); + close(fd); } - if ( !continuation_line ) { - if (( strncmp ( buffer, "alias", 5 ) == 0 ) && isspace ( buffer [5] )) { - char *alias, *mod; - - if ( parse_tag_value ( buffer + 6, &alias, &mod )) { - // fprintf ( stderr, "ALIAS: '%s' -> '%s'\n", alias, mod ); - - if ( !current ) { - first = current = (struct dep_t *) xcalloc ( 1, sizeof ( struct dep_t )); - } - else { - current-> m_next = (struct dep_t *) xcalloc ( 1, sizeof ( struct dep_t )); - current = current-> m_next; - } - current-> m_module = bb_xstrdup ( alias ); - current-> m_isalias = 1; - - if (( strcmp ( mod, "off" ) == 0 ) || ( strcmp ( mod, "null" ) == 0 )) { - current-> m_depcnt = 0; - current-> m_deparr = 0; - } - else { - current-> m_depcnt = 1; - current-> m_deparr = xmalloc ( 1 * sizeof( char * )); - current-> m_deparr[0] = bb_xstrdup ( mod ); - } - current-> m_next = 0; - } - } - else if (( strncmp ( buffer, "options", 7 ) == 0 ) && isspace ( buffer [7] )) { - char *mod, *opt; - - if ( parse_tag_value ( buffer + 8, &mod, &opt )) { - struct dep_t *dt; - - for ( dt = first; dt; dt = dt-> m_next ) { - if ( strcmp ( dt-> m_module, mod ) == 0 ) - break; - } - if ( dt ) { - dt-> m_options = xrealloc ( dt-> m_options, bb_strlen( opt ) + 1 ); - strcpy ( dt-> m_options, opt ); + /* Parse kernel-declared symbol aliases */ + filename = xasprintf(CONFIG_DEFAULT_MODULES_DIR"/%s/modules.symbols", un.release); + fd = open(filename, O_RDONLY); + if (fd < 0) { + /* Ok, that didn't work. Fall back to looking in /lib/modules */ + fd = open(CONFIG_DEFAULT_MODULES_DIR"/modules.symbols", O_RDONLY); + } + if (ENABLE_FEATURE_CLEAN_UP) + free(filename); - // fprintf ( stderr, "OPTION: '%s' -> '%s'\n", dt-> m_module, dt-> m_options ); - } - } - } + if (fd >= 0) { + include_conf(&first, ¤t, line_buffer, sizeof(line_buffer), fd); + close(fd); } } - close ( fd ); return first; } -/* check if /lib/modules/bar/foo.ko belongs to module foo */ -/* return 1 = found, 0 = not found */ -static int mod_strcmp ( const char *mod_path, const char *mod_name ) -{ - /* last path component */ - const char *last_comp = strrchr (mod_path, '/'); - const char *mod_ext = ".o"; - -#if defined(CONFIG_FEATURE_2_6_MODULES) - if ( k_version > 4 ) - mod_ext = ".ko"; -#endif - - last_comp = last_comp ? last_comp + 1 : mod_path; - - return (strncmp(last_comp, - mod_name, - strlen(mod_name)) == 0 ) && - ((strcmp(last_comp + strlen (mod_name), mod_ext) == 0) || last_comp[strlen(mod_name)] == 0) && - (strcmp(mod_path + strlen(mod_path) - - strlen(mod_ext), mod_ext) == 0); -} - /* return 1 = loaded, 0 = not loaded, -1 = can't tell */ -static int already_loaded (const char *name) +static int already_loaded(const char *name) { - int fd; - char buffer[256]; + int fd, ret = 0; - fd = open ("/proc/modules", O_RDONLY); + fd = open("/proc/modules", O_RDONLY); if (fd < 0) return -1; - while ( reads ( fd, buffer, sizeof( buffer ))) { + while (reads(fd, line_buffer, sizeof(line_buffer))) { char *p; - p = strchr (buffer, ' '); + p = strchr(line_buffer, ' '); if (p) { - *p = 0; - if (mod_strcmp (name, buffer)) { - close (fd); - return 1; + const char *n; + + // Truncate buffer at first space and check for matches, with + // the idiosyncrasy that _ and - are interchangeable because the + // 2.6 kernel does weird things. + + *p = '\0'; + for (p = line_buffer, n = name; ; p++, n++) { + if (*p != *n) { + if ((*p == '_' || *p == '-') && (*n == '_' || *n == '-')) + continue; + break; + } + // If we made it to the end, that's a match. + if (!*p) { + ret = 1; + goto done; + } } } } - - close (fd); - return 0; + done: + close(fd); + return ret; } -static int mod_process ( struct mod_list_t *list, int do_insert ) +static int mod_process(const struct mod_list_t *list, int do_insert) { - char lcmd [256]; int rc = 0; - - while ( list ) { - *lcmd = '\0'; - if ( do_insert ) { - if (already_loaded (list->m_module) != 1) - snprintf ( lcmd, sizeof( lcmd ) - 1, "insmod %s %s %s %s %s", - do_syslog ? "-s" : "", autoclean ? "-k" : "", - quiet ? "-q" : "", list-> m_module, list-> m_options ? - list-> m_options : "" ); + char **argv = NULL; + struct mod_opt_t *opts; + int argc_malloc; /* never used when CONFIG_FEATURE_CLEAN_UP not defined */ + int argc; + + while (list) { + argc = 0; + if (ENABLE_FEATURE_CLEAN_UP) + argc_malloc = 0; + /* If CONFIG_FEATURE_CLEAN_UP is not defined, then we leak memory + * each time we allocate memory for argv. + * But it is (quite) small amounts of memory that leak each + * time a module is loaded, and it is reclaimed when modprobe + * exits anyway (even when standalone shell?). + * This could become a problem when loading a module with LOTS of + * dependencies, with LOTS of options for each dependencies, with + * very little memory on the target... But in that case, the module + * would not load because there is no more memory, so there's no + * problem. */ + /* enough for minimal insmod (5 args + NULL) or rmmod (3 args + NULL) */ + argv = xmalloc(6 * sizeof(char*)); + if (do_insert) { + if (already_loaded(list->m_name) != 1) { + argv[argc++] = (char*)"insmod"; + if (ENABLE_FEATURE_2_4_MODULES) { + if (do_syslog) + argv[argc++] = (char*)"-s"; + if (autoclean) + argv[argc++] = (char*)"-k"; + if (quiet) + argv[argc++] = (char*)"-q"; + else if (verbose) /* verbose and quiet are mutually exclusive */ + argv[argc++] = (char*)"-v"; + } + argv[argc++] = list->m_path; + if (ENABLE_FEATURE_CLEAN_UP) + argc_malloc = argc; + opts = list->m_options; + while (opts) { + /* Add one more option */ + argc++; + argv = xrealloc(argv, (argc + 1) * sizeof(char*)); + argv[argc-1] = opts->m_opt_val; + opts = opts->m_next; + } + } } else { - if (already_loaded (list->m_module) != 0) - snprintf ( lcmd, sizeof( lcmd ) - 1, "rmmod %s %s", - do_syslog ? "-s" : "", list-> m_module ); + /* modutils uses short name for removal */ + if (already_loaded(list->m_name) != 0) { + argv[argc++] = (char*)"rmmod"; + if (do_syslog) + argv[argc++] = (char*)"-s"; + argv[argc++] = (char*)list->m_name; + if (ENABLE_FEATURE_CLEAN_UP) + argc_malloc = argc; + } } + argv[argc] = NULL; - if (*lcmd) { + if (argc) { if (verbose) { - printf("%s\n", lcmd); + printf("%s module %s\n", do_insert?"Loading":"Unloading", list->m_name); } if (!show_only) { - int rc2 = system(lcmd); + int rc2 = wait4pid(spawn(argv)); + if (do_insert) { rc = rc2; /* only last module matters */ - } - else if (!rc2) { + } else if (!rc2) { rc = 0; /* success if remove any mod */ } } + if (ENABLE_FEATURE_CLEAN_UP) { + /* the last value in the array has index == argc, but + * it is the terminating NULL, so we must not free it. */ + while (argc_malloc < argc) { + free(argv[argc_malloc++]); + } + } } - list = do_insert ? list-> m_prev : list-> m_next; + if (ENABLE_FEATURE_CLEAN_UP) { + free(argv); + argv = NULL; + } + list = do_insert ? list->m_prev : list->m_next; } return (show_only) ? 0 : rc; } -static void check_dep ( char *mod, struct mod_list_t **head, struct mod_list_t **tail ) +/* + * Check the matching between a pattern and a module name. + * We need this as *_* is equivalent to *-*, even in pattern matching. + */ +static int check_pattern(const char* pat_src, const char* mod_src) +{ + int ret; + + if (ENABLE_FEATURE_MODPROBE_FANCY_ALIAS) { + char* pat; + char* mod; + char* p; + + pat = xstrdup(pat_src); + mod = xstrdup(mod_src); + + for (p = pat; (p = strchr(p, '-')); *p++ = '_'); + for (p = mod; (p = strchr(p, '-')); *p++ = '_'); + + ret = fnmatch(pat, mod, 0); + + if (ENABLE_FEATURE_CLEAN_UP) { + free(pat); + free(mod); + } + + return ret; + } + return fnmatch(pat_src, mod_src, 0); +} + +/* + * Builds the dependency list (aka stack) of a module. + * head: the highest module in the stack (last to insmod, first to rmmod) + * tail: the lowest module in the stack (first to insmod, last to rmmod) + */ +static void check_dep(char *mod, struct mod_list_t **head, struct mod_list_t **tail) { struct mod_list_t *find; struct dep_t *dt; - char *opt = 0; - int lm; - - // remove .o extension - lm = bb_strlen ( mod ); - -#if defined(CONFIG_FEATURE_2_6_MODULES) - if ((k_version > 4) && ( mod [lm-3] == '.' ) && - ( mod [lm-2] == 'k' ) && ( mod [lm-1] == 'o' )) - mod [lm-3] = 0; - else -#endif - if (( mod [lm-2] == '.' ) && ( mod [lm-1] == 'o' )) - mod [lm-2] = 0; - - // check dependencies - for ( dt = depend; dt; dt = dt-> m_next ) { - if ( mod_strcmp ( dt-> m_module, mod )) { - mod = dt-> m_module; - opt = dt-> m_options; + struct mod_opt_t *opt = NULL; + char *path = NULL; + + /* Search for the given module name amongst all dependency rules. + * The module name in a dependency rule can be a shell pattern, + * so try to match the given module name against such a pattern. + * Of course if the name in the dependency rule is a plain string, + * then we consider it a pattern, and matching will still work. */ + for (dt = depend; dt; dt = dt->m_next) { + if (check_pattern(dt->m_name, mod) == 0) { break; } } + if (!dt) { + bb_error_msg("module %s not found", mod); + return; + } + // resolve alias names - while ( dt && dt-> m_isalias ) { - if ( dt-> m_depcnt == 1 ) { + while (dt->m_isalias) { + if (dt->m_depcnt == 1) { struct dep_t *adt; - for ( adt = depend; adt; adt = adt-> m_next ) { - if ( strcmp ( adt-> m_module, dt-> m_deparr [0] ) == 0 ) + for (adt = depend; adt; adt = adt->m_next) { + if (check_pattern(adt->m_name, dt->m_deparr[0]) == 0 && + !(ENABLE_FEATURE_MODPROBE_BLACKLIST && + adt->m_isblacklisted)) break; } - if ( adt ) { + if (adt) { + /* This is the module we are aliased to */ + struct mod_opt_t *opts = dt->m_options; + /* Option of the alias are appended to the options of the module */ + while (opts) { + adt->m_options = append_option(adt->m_options, opts->m_opt_val); + opts = opts->m_next; + } dt = adt; - mod = dt-> m_module; - if ( !opt ) - opt = dt-> m_options; - } - else + } else { + bb_error_msg("module %s not found", mod); return; - } - else + } + } else { + bb_error_msg("bad alias %s", dt->m_name); return; + } } + mod = dt->m_name; + path = dt->m_path; + opt = dt->m_options; + // search for duplicates - for ( find = *head; find; find = find-> m_next ) { - if ( !strcmp ( mod, find-> m_module )) { + for (find = *head; find; find = find->m_next) { + if (strcmp(mod, find->m_name) == 0) { // found -> dequeue it - if ( find-> m_prev ) - find-> m_prev-> m_next = find-> m_next; + if (find->m_prev) + find->m_prev->m_next = find->m_next; else - *head = find-> m_next; + *head = find->m_next; - if ( find-> m_next ) - find-> m_next-> m_prev = find-> m_prev; + if (find->m_next) + find->m_next->m_prev = find->m_prev; else - *tail = find-> m_prev; + *tail = find->m_prev; break; // there can be only one duplicate } } - if ( !find ) { // did not find a duplicate - find = (struct mod_list_t *) xmalloc ( sizeof(struct mod_list_t)); - find-> m_module = mod; - find-> m_options = opt; + if (!find) { // did not find a duplicate + find = xzalloc(sizeof(struct mod_list_t)); + find->m_name = mod; + find->m_path = path; + find->m_options = opt; } // enqueue at tail - if ( *tail ) - (*tail)-> m_next = find; - find-> m_prev = *tail; - find-> m_next = 0; + if (*tail) + (*tail)->m_next = find; + find->m_prev = *tail; + find->m_next = NULL; /* possibly NOT done by xzalloc! */ - if ( !*head ) + if (!*head) *head = find; *tail = find; - if ( dt ) { + if (dt) { int i; - for ( i = 0; i < dt-> m_depcnt; i++ ) - check_dep ( dt-> m_deparr [i], head, tail ); + /* Add all dependable module for that new module */ + for (i = 0; i < dt->m_depcnt; i++) + check_dep(dt->m_deparr[i], head, tail); } } - - -static int mod_insert ( char *mod, int argc, char **argv ) +static int mod_insert(char *mod, int argc, char **argv) { - struct mod_list_t *tail = 0; - struct mod_list_t *head = 0; + struct mod_list_t *tail = NULL; + struct mod_list_t *head = NULL; int rc; // get dep list for module mod - check_dep ( mod, &head, &tail ); + check_dep(mod, &head, &tail); - if ( head && tail ) { - if ( argc ) { + rc = 1; + if (head && tail) { + if (argc) { int i; - int l = 0; - // append module args - for ( i = 0; i < argc; i++ ) - l += ( bb_strlen ( argv [i] ) + 1 ); - - head-> m_options = xrealloc ( head-> m_options, l + 1 ); - head-> m_options [0] = 0; - - for ( i = 0; i < argc; i++ ) { - strcat ( head-> m_options, argv [i] ); - strcat ( head-> m_options, " " ); - } + for (i = 0; i < argc; i++) + head->m_options = append_option(head->m_options, argv[i]); } // process tail ---> head - rc = mod_process ( tail, 1 ); + rc = mod_process(tail, 1); + if (rc) { + /* + * In case of using udev, multiple instances of modprobe can be + * spawned to load the same module (think of two same usb devices, + * for example; or cold-plugging at boot time). Thus we shouldn't + * fail if the module was loaded, and not by us. + */ + if (already_loaded(mod)) + rc = 0; + } } - else - rc = 1; - return rc; } -static int mod_remove ( char *mod ) +static int mod_remove(char *mod) { int rc; - static struct mod_list_t rm_a_dummy = { "-a", 0, 0 }; + static const struct mod_list_t rm_a_dummy = { "-a", NULL, NULL, NULL, NULL }; - struct mod_list_t *head = 0; - struct mod_list_t *tail = 0; + struct mod_list_t *head = NULL; + struct mod_list_t *tail = NULL; - if ( mod ) - check_dep ( mod, &head, &tail ); + if (mod) + check_dep(mod, &head, &tail); else // autoclean - head = tail = &rm_a_dummy; + head = tail = (struct mod_list_t*) &rm_a_dummy; - if ( head && tail ) - rc = mod_process ( head, 0 ); // process head ---> tail - else - rc = 1; + rc = 1; + if (head && tail) + rc = mod_process(head, 0); // process head ---> tail return rc; - } +int modprobe_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE; +int modprobe_main(int argc, char **argv) +{ + int rc = EXIT_SUCCESS; + char *unused; + opt_complementary = "q-v:v-q"; + getopt32(argv, MAIN_OPT_STR, &unused, &unused); -extern int modprobe_main(int argc, char** argv) -{ - int opt; - int remove_opt = 0; - - autoclean = show_only = quiet = do_syslog = verbose = 0; - - while ((opt = getopt(argc, argv, "acdklnqrst:vVC:")) != -1) { - switch(opt) { - case 'c': // no config used - case 'l': // no pattern matching - return EXIT_SUCCESS; - break; - case 'C': // no config used - case 't': // no pattern matching - bb_error_msg_and_die("-t and -C not supported"); - - case 'a': // ignore - case 'd': // ignore - break; - case 'k': - autoclean++; - break; - case 'n': - show_only++; - break; - case 'q': - quiet++; - break; - case 'r': - remove_opt++; - break; - case 's': - do_syslog++; - break; - case 'v': - verbose++; - break; - case 'V': - default: - bb_show_usage(); - break; - } - } + if (option_mask32 & (DUMP_CONF_EXIT | LIST_ALL)) + return EXIT_SUCCESS; + if (option_mask32 & (RESTRICT_DIR | CONFIG_FILE)) + bb_error_msg_and_die("-t and -C not supported"); - depend = build_dep ( ); + depend = build_dep(); - if ( !depend ) - bb_error_msg_and_die ( "could not parse modules.dep\n" ); + if (!depend) + bb_error_msg_and_die("cannot parse "CONFIG_DEFAULT_DEPMOD_FILE); if (remove_opt) { - int rc = EXIT_SUCCESS; do { - if (mod_remove ( optind < argc ? - bb_xstrdup (argv [optind]) : NULL )) { - bb_error_msg ("failed to remove module %s", - argv [optind] ); + /* argv[optind] can be NULL here */ + if (mod_remove(argv[optind])) { + bb_error_msg("failed to %s module %s", "remove", + argv[optind]); rc = EXIT_FAILURE; } - } while ( ++optind < argc ); + } while (++optind < argc); + } else { + if (optind >= argc) + bb_error_msg_and_die("no module or pattern provided"); - return rc; + if (mod_insert(argv[optind], argc - optind - 1, argv + optind + 1)) + bb_error_msg_and_die("failed to %s module %s", "load", argv[optind]); } - if (optind >= argc) - bb_error_msg_and_die ( "No module or pattern provided\n" ); + /* Here would be a good place to free up memory allocated during the dependencies build. */ - if ( mod_insert ( bb_xstrdup ( argv [optind] ), argc - optind - 1, argv + optind + 1 )) - bb_error_msg_and_die ( "failed to load module %s", argv [optind] ); - - return EXIT_SUCCESS; + return rc; }