tools/modprobe.c

   1 /*
   2  * kmod-modprobe - manage linux kernel modules using libkmod.
   3  *
   4  * Copyright (C) 2011-2013  ProFUSION embedded systems
   5  *
   6  * This program is free software: you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation, either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include <assert.h>
  21 #include <errno.h>
  22 #include <getopt.h>
  23 #include <limits.h>
  24 #include <stdbool.h>
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include <string.h>
  28 #include <unistd.h>
  29 #include <sys/stat.h>
  30 #include <sys/types.h>
  31 #include <sys/utsname.h>
  32 #include <sys/wait.h>
  33
  34 #include <shared/array.h>
  35 #include <shared/macro.h>
  36
  37 #include <libkmod/libkmod.h>
  38
  39 #include "kmod.h"
  40
  41 static int log_priority = LOG_CRIT;
  42 static int use_syslog = 0;
  43 #define LOG(...) log_printf(log_priority, __VA_ARGS__)
  44
  45 #define DEFAULT_VERBOSE LOG_WARNING
  46 static int verbose = DEFAULT_VERBOSE;
  47 static int do_show = 0;
  48 static int dry_run = 0;
  49 static int ignore_loaded = 0;
  50 static int lookup_only = 0;
  51 static int first_time = 0;
  52 static int ignore_commands = 0;
  53 static int use_blacklist = 0;
  54 static int force = 0;
  55 static int strip_modversion = 0;
  56 static int strip_vermagic = 0;
  57 static int remove_holders = 0;
  58 static int quiet_inuse = 0;
  59
  60 static const char cmdopts_s[] = "arRibfDcnC:d:S:sqvVh";
  61 static const struct option cmdopts[] = {
  62         {"all", no_argument, 0, 'a'},
  63         {"remove", no_argument, 0, 'r'},
  64         {"remove-dependencies", no_argument, 0, 5},
  65         {"remove-holders", no_argument, 0, 5},
  66         {"resolve-alias", no_argument, 0, 'R'},
  67         {"first-time", no_argument, 0, 3},
  68         {"ignore-install", no_argument, 0, 'i'},
  69         {"ignore-remove", no_argument, 0, 'i'},
  70         {"use-blacklist", no_argument, 0, 'b'},
  71         {"force", no_argument, 0, 'f'},
  72         {"force-modversion", no_argument, 0, 2},
  73         {"force-vermagic", no_argument, 0, 1},
  74
  75         {"show-depends", no_argument, 0, 'D'},
  76         {"showconfig", no_argument, 0, 'c'},
  77         {"show-config", no_argument, 0, 'c'},
  78         {"show-modversions", no_argument, 0, 4},
  79         {"dump-modversions", no_argument, 0, 4},
  80         {"show-exports", no_argument, 0, 6},
  81
  82         {"dry-run", no_argument, 0, 'n'},
  83         {"show", no_argument, 0, 'n'},
  84
  85         {"config", required_argument, 0, 'C'},
  86         {"dirname", required_argument, 0, 'd'},
  87         {"set-version", required_argument, 0, 'S'},
  88
  89         {"syslog", no_argument, 0, 's'},
  90         {"quiet", no_argument, 0, 'q'},
  91         {"verbose", no_argument, 0, 'v'},
  92         {"version", no_argument, 0, 'V'},
  93         {"help", no_argument, 0, 'h'},
  94         {NULL, 0, 0, 0}
  95 };
  96
  97 static void help(void)
  98 {
  99         printf("Usage:\n"
 100                 "\t%s [options] [-i] [-b] modulename\n"
 101                 "\t%s [options] -a [-i] [-b] modulename [modulename...]\n"
 102                 "\t%s [options] -r [-i] modulename\n"
 103                 "\t%s [options] -r -a [-i] modulename [modulename...]\n"
 104                 "\t%s [options] -c\n"
 105                 "\t%s [options] --dump-modversions filename\n"
 106                 "Management Options:\n"
 107                 "\t-a, --all                   Consider every non-argument to\n"
 108                 "\t                            be a module name to be inserted\n"
 109                 "\t                            or removed (-r)\n"
 110                 "\t-r, --remove                Remove modules instead of inserting\n"
 111                 "\t    --remove-dependencies   Deprecated: use --remove-holders\n"
 112                 "\t    --remove-holders        Also remove module holders (use together with -r)\n"
 113                 "\t-R, --resolve-alias         Only lookup and print alias and exit\n"
 114                 "\t    --first-time            Fail if module already inserted or removed\n"
 115                 "\t-i, --ignore-install        Ignore install commands\n"
 116                 "\t-i, --ignore-remove         Ignore remove commands\n"
 117                 "\t-b, --use-blacklist         Apply blacklist to resolved alias.\n"
 118                 "\t-f, --force                 Force module insertion or removal.\n"
 119                 "\t                            implies --force-modversions and\n"
 120                 "\t                            --force-vermagic\n"
 121                 "\t    --force-modversion      Ignore module's version\n"
 122                 "\t    --force-vermagic        Ignore module's version magic\n"
 123                 "\n"
 124                 "Query Options:\n"
 125                 "\t-D, --show-depends          Only print module dependencies and exit\n"
 126                 "\t-c, --showconfig            Print out known configuration and exit\n"
 127                 "\t-c, --show-config           Same as --showconfig\n"
 128                 "\t    --show-modversions      Dump module symbol version and exit\n"
 129                 "\t    --dump-modversions      Same as --show-modversions\n"
 130                 "\t    --show-exports          Only print module exported symbol versions and exit\n"
 131                 "\n"
 132                 "General Options:\n"
 133                 "\t-n, --dry-run               Do not execute operations, just print out\n"
 134                 "\t-n, --show                  Same as --dry-run\n"
 135
 136                 "\t-C, --config=FILE           Use FILE instead of default search paths\n"
 137                 "\t-d, --dirname=DIR           Use DIR as filesystem root for /lib/modules\n"
 138                 "\t-S, --set-version=VERSION   Use VERSION instead of `uname -r`\n"
 139
 140                 "\t-s, --syslog                print to syslog, not stderr\n"
 141                 "\t-q, --quiet                 disable messages\n"
 142                 "\t-v, --verbose               enables more messages\n"
 143                 "\t-V, --version               show version\n"
 144                 "\t-h, --help                  show this help\n",
 145                 program_invocation_short_name, program_invocation_short_name,
 146                 program_invocation_short_name, program_invocation_short_name,
 147                 program_invocation_short_name, program_invocation_short_name);
 148 }
 149
 150 _printf_format_(1, 2)
 151 static inline void _show(const char *fmt, ...)
 152 {
 153         va_list args;
 154
 155         if (!do_show && verbose <= DEFAULT_VERBOSE)
 156                 return;
 157
 158         va_start(args, fmt);
 159         vfprintf(stdout, fmt, args);
 160         fflush(stdout);
 161         va_end(args);
 162 }
 163 #define SHOW(...) _show(__VA_ARGS__)
 164
 165 static int show_config(struct kmod_ctx *ctx)
 166 {
 167         struct config_iterators {
 168                 const char *name;
 169                 struct kmod_config_iter *(*get_iter)(const struct kmod_ctx *ctx);
 170         } ci[] = {
 171                 { "blacklist", kmod_config_get_blacklists },
 172                 { "install", kmod_config_get_install_commands },
 173                 { "remove", kmod_config_get_remove_commands },
 174                 { "alias", kmod_config_get_aliases },
 175                 { "options", kmod_config_get_options },
 176                 { "softdep", kmod_config_get_softdeps },
 177         };
 178         size_t i;
 179
 180         for (i = 0;  i < ARRAY_SIZE(ci); i++) {
 181                 struct kmod_config_iter *iter = ci[i].get_iter(ctx);
 182
 183                 if (iter == NULL)
 184                         continue;
 185
 186                 while (kmod_config_iter_next(iter)) {
 187                         const char *val;
 188
 189                         printf("%s %s", ci[i].name,
 190                                         kmod_config_iter_get_key(iter));
 191                         val = kmod_config_iter_get_value(iter);
 192                         if (val != NULL) {
 193                                 putchar(' ');
 194                                 puts(val);
 195                         } else
 196                                 putchar('\n');
 197                 }
 198
 199                 kmod_config_iter_free_iter(iter);
 200         }
 201
 202         puts("\n# End of configuration files. Dumping indexes now:\n");
 203         fflush(stdout);
 204
 205         kmod_dump_index(ctx, KMOD_INDEX_MODULES_ALIAS, STDOUT_FILENO);
 206         kmod_dump_index(ctx, KMOD_INDEX_MODULES_SYMBOL, STDOUT_FILENO);
 207
 208         return 0;
 209 }
 210
 211 static int show_modversions(struct kmod_ctx *ctx, const char *filename)
 212 {
 213         struct kmod_list *l, *list = NULL;
 214         struct kmod_module *mod;
 215         int err = kmod_module_new_from_path(ctx, filename, &mod);
 216         if (err < 0) {
 217                 LOG("Module %s not found.\n", filename);
 218                 return err;
 219         }
 220
 221         err = kmod_module_get_versions(mod, &list);
 222         if (err < 0) {
 223                 LOG("could not get modversions of %s: %s\n",
 224                         filename, strerror(-err));
 225                 kmod_module_unref(mod);
 226                 return err;
 227         }
 228
 229         kmod_list_foreach(l, list) {
 230                 const char *symbol = kmod_module_version_get_symbol(l);
 231                 uint64_t crc = kmod_module_version_get_crc(l);
 232                 printf("0x%08"PRIx64"\t%s\n", crc, symbol);
 233         }
 234         kmod_module_versions_free_list(list);
 235         kmod_module_unref(mod);
 236         return 0;
 237 }
 238
 239 static int show_exports(struct kmod_ctx *ctx, const char *filename)
 240 {
 241         struct kmod_list *l, *list = NULL;
 242         struct kmod_module *mod;
 243         int err = kmod_module_new_from_path(ctx, filename, &mod);
 244         if (err < 0) {
 245                 LOG("Module %s not found.\n", filename);
 246                 return err;
 247         }
 248
 249         err = kmod_module_get_symbols(mod, &list);
 250         if (err < 0) {
 251                 LOG("could not get symbols of %s: %s\n",
 252                         filename, strerror(-err));
 253                 kmod_module_unref(mod);
 254                 return err;
 255         }
 256
 257         kmod_list_foreach(l, list) {
 258                 const char *symbol = kmod_module_symbol_get_symbol(l);
 259                 uint64_t crc = kmod_module_symbol_get_crc(l);
 260                 printf("0x%08"PRIx64"\t%s\n", crc, symbol);
 261         }
 262         kmod_module_symbols_free_list(list);
 263         kmod_module_unref(mod);
 264         return 0;
 265 }
 266
 267 static int command_do(struct kmod_module *module, const char *type,
 268                                 const char *command, const char *cmdline_opts)
 269 {
 270         const char *modname = kmod_module_get_name(module);
 271         char *p, *cmd = NULL;
 272         size_t cmdlen, cmdline_opts_len, varlen;
 273         int ret = 0;
 274
 275         if (cmdline_opts == NULL)
 276                 cmdline_opts = "";
 277         cmdline_opts_len = strlen(cmdline_opts);
 278
 279         cmd = strdup(command);
 280         if (cmd == NULL)
 281                 return -ENOMEM;
 282         cmdlen = strlen(cmd);
 283         varlen = sizeof("$CMDLINE_OPTS") - 1;
 284         while ((p = strstr(cmd, "$CMDLINE_OPTS")) != NULL) {
 285                 size_t prefixlen = p - cmd;
 286                 size_t suffixlen = cmdlen - prefixlen - varlen;
 287                 size_t slen = cmdlen - varlen + cmdline_opts_len;
 288                 char *suffix = p + varlen;
 289                 char *s = malloc(slen + 1);
 290                 if (s == NULL) {
 291                         free(cmd);
 292                         return -ENOMEM;
 293                 }
 294                 memcpy(s, cmd, p - cmd);
 295                 memcpy(s + prefixlen, cmdline_opts, cmdline_opts_len);
 296                 memcpy(s + prefixlen + cmdline_opts_len, suffix, suffixlen);
 297                 s[slen] = '\0';
 298
 299                 free(cmd);
 300                 cmd = s;
 301                 cmdlen = slen;
 302         }
 303
 304         SHOW("%s %s\n", type, cmd);
 305         if (dry_run)
 306                 goto end;
 307
 308         setenv("MODPROBE_MODULE", modname, 1);
 309         ret = system(cmd);
 310         unsetenv("MODPROBE_MODULE");
 311         if (ret == -1 || WEXITSTATUS(ret)) {
 312                 LOG("Error running %s command for %s\n", type, modname);
 313                 if (ret != -1)
 314                         ret = -WEXITSTATUS(ret);
 315         }
 316
 317 end:
 318         free(cmd);
 319         return ret;
 320 }
 321
 322 static int rmmod_do_remove_module(struct kmod_module *mod)
 323 {
 324         const char *modname = kmod_module_get_name(mod);
 325         struct kmod_list *deps, *itr;
 326         int flags = 0, err;
 327
 328         SHOW("rmmod %s\n", kmod_module_get_name(mod));
 329
 330         if (dry_run)
 331                 return 0;
 332
 333         if (force)
 334                 flags |= KMOD_REMOVE_FORCE;
 335
 336         err = kmod_module_remove_module(mod, flags);
 337         if (err == -EEXIST) {
 338                 if (!first_time)
 339                         err = 0;
 340                 else
 341                         LOG("Module %s is not in kernel.\n", modname);
 342         }
 343
 344         deps = kmod_module_get_dependencies(mod);
 345         if (deps != NULL) {
 346                 kmod_list_foreach(itr, deps) {
 347                         struct kmod_module *dep = kmod_module_get_module(itr);
 348                         if (kmod_module_get_refcnt(dep) == 0)
 349                                 rmmod_do_remove_module(dep);
 350                         kmod_module_unref(dep);
 351                 }
 352                 kmod_module_unref_list(deps);
 353         }
 354
 355         return err;
 356 }
 357
 358 #define RMMOD_FLAG_REMOVE_HOLDERS       0x1
 359 #define RMMOD_FLAG_IGNORE_BUILTIN       0x2
 360 static int rmmod_do_module(struct kmod_module *mod, int flags);
 361
 362 /* Remove modules in reverse order */
 363 static int rmmod_do_modlist(struct kmod_list *list, bool stop_on_errors)
 364 {
 365         struct kmod_list *l;
 366
 367         kmod_list_foreach_reverse(l, list) {
 368                 struct kmod_module *m = kmod_module_get_module(l);
 369                 int r = rmmod_do_module(m, RMMOD_FLAG_IGNORE_BUILTIN);
 370                 kmod_module_unref(m);
 371
 372                 if (r < 0 && stop_on_errors)
 373                         return r;
 374         }
 375
 376         return 0;
 377 }
 378
 379 static int rmmod_do_module(struct kmod_module *mod, int flags)
 380 {
 381         const char *modname = kmod_module_get_name(mod);
 382         struct kmod_list *pre = NULL, *post = NULL;
 383         const char *cmd = NULL;
 384         int err;
 385
 386         if (!ignore_commands) {
 387                 err = kmod_module_get_softdeps(mod, &pre, &post);
 388                 if (err < 0) {
 389                         WRN("could not get softdeps of '%s': %s\n",
 390                                                 modname, strerror(-err));
 391                         return err;
 392                 }
 393
 394                 cmd = kmod_module_get_remove_commands(mod);
 395         }
 396
 397         if (cmd == NULL && !ignore_loaded) {
 398                 int state = kmod_module_get_initstate(mod);
 399
 400                 if (state < 0) {
 401                         if (first_time) {
 402                                 LOG("Module %s is not in kernel.\n", modname);
 403                                 err = -ENOENT;
 404                         } else {
 405                                 err = 0;
 406                         }
 407                         goto error;
 408                 } else if (state == KMOD_MODULE_BUILTIN) {
 409                         if (flags & RMMOD_FLAG_IGNORE_BUILTIN) {
 410                                 err = 0;
 411                         } else {
 412                                 LOG("Module %s is builtin.\n", modname);
 413                                 err = -ENOENT;
 414                         }
 415                         goto error;
 416                 }
 417         }
 418
 419         rmmod_do_modlist(post, false);
 420
 421         if ((flags & RMMOD_FLAG_REMOVE_HOLDERS) && remove_holders) {
 422                 struct kmod_list *holders = kmod_module_get_holders(mod);
 423
 424                 err = rmmod_do_modlist(holders, true);
 425                 if (err < 0)
 426                         goto error;
 427         }
 428
 429         if (!ignore_loaded && !cmd) {
 430                 int usage = kmod_module_get_refcnt(mod);
 431
 432                 if (usage > 0) {
 433                         if (!quiet_inuse)
 434                                 LOG("Module %s is in use.\n", modname);
 435
 436                         err = -EBUSY;
 437                         goto error;
 438                 }
 439         }
 440
 441         if (cmd == NULL)
 442                 err = rmmod_do_remove_module(mod);
 443         else
 444                 err = command_do(mod, "remove", cmd, NULL);
 445
 446         if (err < 0)
 447                 goto error;
 448
 449         rmmod_do_modlist(pre, false);
 450
 451 error:
 452         kmod_module_unref_list(pre);
 453         kmod_module_unref_list(post);
 454
 455         return err;
 456 }
 457
 458 static int rmmod(struct kmod_ctx *ctx, const char *alias)
 459 {
 460         struct kmod_list *l, *list = NULL;
 461         int err;
 462
 463         err = kmod_module_new_from_lookup(ctx, alias, &list);
 464         if (err < 0)
 465                 return err;
 466
 467         if (list == NULL) {
 468                 LOG("Module %s not found.\n", alias);
 469                 err = -ENOENT;
 470         }
 471
 472         kmod_list_foreach(l, list) {
 473                 struct kmod_module *mod = kmod_module_get_module(l);
 474                 err = rmmod_do_module(mod, RMMOD_FLAG_REMOVE_HOLDERS);
 475                 kmod_module_unref(mod);
 476                 if (err < 0)
 477                         break;
 478         }
 479
 480         kmod_module_unref_list(list);
 481         return err;
 482 }
 483
 484 static int rmmod_all(struct kmod_ctx *ctx, char **args, int nargs)
 485 {
 486         int i, err = 0;
 487
 488         for (i = 0; i < nargs; i++) {
 489                 int r = rmmod(ctx, args[i]);
 490                 if (r < 0)
 491                         err = r;
 492         }
 493
 494         return err;
 495 }
 496
 497 static void print_action(struct kmod_module *m, bool install,
 498                                                         const char *options)
 499 {
 500         const char *path;
 501
 502         if (install) {
 503                 printf("install %s %s\n", kmod_module_get_install_commands(m),
 504                                                                 options);
 505                 return;
 506         }
 507
 508         path = kmod_module_get_path(m);
 509
 510         if (path == NULL) {
 511                 /*
 512                  * Either a builtin module, or an alias, print only for
 513                  * builtin
 514                  */
 515                 if (kmod_module_get_initstate(m) == KMOD_MODULE_BUILTIN)
 516                         printf("builtin %s\n", kmod_module_get_name(m));
 517         } else
 518                 printf("insmod %s %s\n", kmod_module_get_path(m), options);
 519 }
 520
 521 static int insmod(struct kmod_ctx *ctx, const char *alias,
 522                                                 const char *extra_options)
 523 {
 524         struct kmod_list *l, *list = NULL;
 525         int err, flags = 0;
 526
 527         void (*show)(struct kmod_module *m, bool install,
 528                                                 const char *options) = NULL;
 529
 530         err = kmod_module_new_from_lookup(ctx, alias, &list);
 531
 532         if (list == NULL || err < 0) {
 533                 LOG("Module %s not found in directory %s\n", alias,
 534                         ctx ? kmod_get_dirname(ctx) : "(missing)");
 535                 return -ENOENT;
 536         }
 537
 538         if (strip_modversion || force)
 539                 flags |= KMOD_PROBE_FORCE_MODVERSION;
 540         if (strip_vermagic || force)
 541                 flags |= KMOD_PROBE_FORCE_VERMAGIC;
 542         if (ignore_commands)
 543                 flags |= KMOD_PROBE_IGNORE_COMMAND;
 544         if (ignore_loaded)
 545                 flags |= KMOD_PROBE_IGNORE_LOADED;
 546         if (dry_run)
 547                 flags |= KMOD_PROBE_DRY_RUN;
 548         if (do_show || verbose > DEFAULT_VERBOSE)
 549                 show = &print_action;
 550
 551         flags |= KMOD_PROBE_APPLY_BLACKLIST_ALIAS_ONLY;
 552
 553         if (use_blacklist)
 554                 flags |= KMOD_PROBE_APPLY_BLACKLIST;
 555         if (first_time)
 556                 flags |= KMOD_PROBE_FAIL_ON_LOADED;
 557
 558         kmod_list_foreach(l, list) {
 559                 struct kmod_module *mod = kmod_module_get_module(l);
 560
 561                 if (lookup_only)
 562                         printf("%s\n", kmod_module_get_name(mod));
 563                 else {
 564                         err = kmod_module_probe_insert_module(mod, flags,
 565                                         extra_options, NULL, NULL, show);
 566                 }
 567
 568                 if (err >= 0)
 569                         /* ignore flag return values such as a mod being blacklisted */
 570                         err = 0;
 571                 else {
 572                         switch (err) {
 573                         case -EEXIST:
 574                                 ERR("could not insert '%s': Module already in kernel\n",
 575                                                         kmod_module_get_name(mod));
 576                                 break;
 577                         case -ENOENT:
 578                                 ERR("could not insert '%s': Unknown symbol in module, "
 579                                                 "or unknown parameter (see dmesg)\n",
 580                                                 kmod_module_get_name(mod));
 581                                 break;
 582                         default:
 583                                 ERR("could not insert '%s': %s\n",
 584                                                 kmod_module_get_name(mod),
 585                                                 strerror(-err));
 586                                 break;
 587                         }
 588                 }
 589
 590                 kmod_module_unref(mod);
 591         }
 592
 593         kmod_module_unref_list(list);
 594         return err;
 595 }
 596
 597 static int insmod_all(struct kmod_ctx *ctx, char **args, int nargs)
 598 {
 599         int i, err = 0;
 600
 601         for (i = 0; i < nargs; i++) {
 602                 int r = insmod(ctx, args[i], NULL);
 603                 if (r < 0)
 604                         err = r;
 605         }
 606
 607         return err;
 608 }
 609
 610 static void env_modprobe_options_append(const char *value)
 611 {
 612         const char *old = getenv("MODPROBE_OPTIONS");
 613         char *env;
 614
 615         if (old == NULL) {
 616                 setenv("MODPROBE_OPTIONS", value, 1);
 617                 return;
 618         }
 619
 620         if (asprintf(&env, "%s %s", old, value) < 0) {
 621                 ERR("could not append value to $MODPROBE_OPTIONS\n");
 622                 return;
 623         }
 624
 625         if (setenv("MODPROBE_OPTIONS", env, 1) < 0)
 626                 ERR("could not setenv(MODPROBE_OPTIONS, \"%s\")\n", env);
 627         free(env);
 628 }
 629
 630 static int options_from_array(char **args, int nargs, char **output)
 631 {
 632         char *opts = NULL;
 633         size_t optslen = 0;
 634         int i, err = 0;
 635
 636         for (i = 1; i < nargs; i++) {
 637                 size_t len = strlen(args[i]);
 638                 size_t qlen = 0;
 639                 const char *value;
 640                 void *tmp;
 641
 642                 value = strchr(args[i], '=');
 643                 if (value) {
 644                         value++;
 645                         if (*value != '"' && *value != '\'') {
 646                                 if (strchr(value, ' '))
 647                                         qlen = 2;
 648                         }
 649                 }
 650
 651                 tmp = realloc(opts, optslen + len + qlen + 2);
 652                 if (!tmp) {
 653                         err = -errno;
 654                         free(opts);
 655                         opts = NULL;
 656                         ERR("could not gather module options: out-of-memory\n");
 657                         break;
 658                 }
 659                 opts = tmp;
 660                 if (optslen > 0) {
 661                         opts[optslen] = ' ';
 662                         optslen++;
 663                 }
 664                 if (qlen == 0) {
 665                         memcpy(opts + optslen, args[i], len + 1);
 666                         optslen += len;
 667                 } else {
 668                         size_t keylen = value - args[i];
 669                         size_t valuelen = len - keylen;
 670                         memcpy(opts + optslen, args[i], keylen);
 671                         optslen += keylen;
 672                         opts[optslen] = '"';
 673                         optslen++;
 674                         memcpy(opts + optslen, value, valuelen);
 675                         optslen += valuelen;
 676                         opts[optslen] = '"';
 677                         optslen++;
 678                         opts[optslen] = '\0';
 679                 }
 680         }
 681
 682         *output = opts;
 683         return err;
 684 }
 685
 686 static char **prepend_options_from_env(int *p_argc, char **orig_argv)
 687 {
 688         const char *p, *env = getenv("MODPROBE_OPTIONS");
 689         char **new_argv, *str_end, *str, *s, *quote;
 690         int i, argc = *p_argc;
 691         size_t envlen, space_count = 0;
 692
 693         if (env == NULL)
 694                 return orig_argv;
 695
 696         for (p = env; *p != '\0'; p++) {
 697                 if (*p == ' ')
 698                         space_count++;
 699         }
 700
 701         envlen = p - env;
 702         new_argv = malloc(sizeof(char *) * (argc + space_count + 3 + envlen));
 703         if (new_argv == NULL)
 704                 return NULL;
 705
 706         new_argv[0] = orig_argv[0];
 707         str = (char *) (new_argv + argc + space_count + 3);
 708         memcpy(str, env, envlen + 1);
 709
 710         str_end = str + envlen;
 711
 712         quote = NULL;
 713         for (i = 1, s = str; *s != '\0'; s++) {
 714                 if (quote == NULL) {
 715                         if (*s == ' ') {
 716                                 new_argv[i] = str;
 717                                 i++;
 718                                 *s = '\0';
 719                                 str = s + 1;
 720                         } else if (*s == '"' || *s == '\'')
 721                                 quote = s;
 722                 } else {
 723                         if (*s == *quote) {
 724                                 if (quote == str) {
 725                                         new_argv[i] = str + 1;
 726                                         i++;
 727                                         *s = '\0';
 728                                         str = s + 1;
 729                                 } else {
 730                                         char *it;
 731                                         for (it = quote; it < s - 1; it++)
 732                                                 it[0] = it[1];
 733                                         for (it = s - 1; it < str_end - 2; it++)
 734                                                 it[0] = it[2];
 735                                         str_end -= 2;
 736                                         *str_end = '\0';
 737                                         s -= 2;
 738                                 }
 739                                 quote = NULL;
 740                         }
 741                 }
 742         }
 743         if (str < s) {
 744                 new_argv[i] = str;
 745                 i++;
 746         }
 747
 748         memcpy(new_argv + i, orig_argv + 1, sizeof(char *) * (argc - 1));
 749         new_argv[i + argc - 1] = NULL;
 750         *p_argc = i + argc - 1;
 751
 752         return new_argv;
 753 }
 754
 755 static int do_modprobe(int argc, char **orig_argv)
 756 {
 757         struct kmod_ctx *ctx;
 758         char **args = NULL, **argv;
 759         const char **config_paths = NULL;
 760         int nargs = 0, n_config_paths = 0;
 761         char dirname_buf[PATH_MAX];
 762         const char *dirname = NULL;
 763         const char *root = NULL;
 764         const char *kversion = NULL;
 765         int use_all = 0;
 766         int do_remove = 0;
 767         int do_show_config = 0;
 768         int do_show_modversions = 0;
 769         int do_show_exports = 0;
 770         int err;
 771
 772         argv = prepend_options_from_env(&argc, orig_argv);
 773         if (argv == NULL) {
 774                 ERR("Could not prepend options from command line\n");
 775                 return EXIT_FAILURE;
 776         }
 777
 778         for (;;) {
 779                 int c, idx = 0;
 780                 c = getopt_long(argc, argv, cmdopts_s, cmdopts, &idx);
 781                 if (c == -1)
 782                         break;
 783                 switch (c) {
 784                 case 'a':
 785                         log_priority = LOG_WARNING;
 786                         use_all = 1;
 787                         break;
 788                 case 'r':
 789                         do_remove = 1;
 790                         break;
 791                 case 5:
 792                         remove_holders = 1;
 793                         break;
 794                 case 'R':
 795                         lookup_only = 1;
 796                         break;
 797                 case 3:
 798                         first_time = 1;
 799                         break;
 800                 case 'i':
 801                         ignore_commands = 1;
 802                         break;
 803                 case 'b':
 804                         use_blacklist = 1;
 805                         break;
 806                 case 'f':
 807                         force = 1;
 808                         break;
 809                 case 2:
 810                         strip_modversion = 1;
 811                         break;
 812                 case 1:
 813                         strip_vermagic = 1;
 814                         break;
 815                 case 'D':
 816                         ignore_loaded = 1;
 817                         dry_run = 1;
 818                         do_show = 1;
 819                         break;
 820                 case 'c':
 821                         do_show_config = 1;
 822                         break;
 823                 case 4:
 824                         do_show_modversions = 1;
 825                         break;
 826                 case 6:
 827                         do_show_exports = 1;
 828                         break;
 829                 case 'n':
 830                         dry_run = 1;
 831                         break;
 832                 case 'C': {
 833                         size_t bytes = sizeof(char *) * (n_config_paths + 2);
 834                         void *tmp = realloc(config_paths, bytes);
 835                         if (!tmp) {
 836                                 ERR("out-of-memory\n");
 837                                 err = -1;
 838                                 goto done;
 839                         }
 840                         config_paths = tmp;
 841                         config_paths[n_config_paths] = optarg;
 842                         n_config_paths++;
 843                         config_paths[n_config_paths] = NULL;
 844
 845                         env_modprobe_options_append("-C");
 846                         env_modprobe_options_append(optarg);
 847                         break;
 848                 }
 849                 case 'd':
 850                         root = optarg;
 851                         break;
 852                 case 'S':
 853                         kversion = optarg;
 854                         break;
 855                 case 's':
 856                         env_modprobe_options_append("-s");
 857                         use_syslog = 1;
 858                         break;
 859                 case 'q':
 860                         env_modprobe_options_append("-q");
 861                         verbose = LOG_EMERG;
 862                         break;
 863                 case 'v':
 864                         env_modprobe_options_append("-v");
 865                         verbose++;
 866                         break;
 867                 case 'V':
 868                         puts(PACKAGE " version " VERSION);
 869                         puts(KMOD_FEATURES);
 870                         err = 0;
 871                         goto done;
 872                 case 'h':
 873                         help();
 874                         err = 0;
 875                         goto done;
 876                 case '?':
 877                         err = -1;
 878                         goto done;
 879                 default:
 880                         ERR("unexpected getopt_long() value '%c'.\n", c);
 881                         err = -1;
 882                         goto done;
 883                 }
 884         }
 885
 886         args = argv + optind;
 887         nargs = argc - optind;
 888
 889         log_open(use_syslog);
 890
 891         if (!do_show_config) {
 892                 if (nargs == 0) {
 893                         ERR("missing parameters. See -h.\n");
 894                         err = -1;
 895                         goto done;
 896                 }
 897         }
 898
 899         if (root != NULL || kversion != NULL) {
 900                 struct utsname u;
 901                 if (root == NULL)
 902                         root = "";
 903                 if (kversion == NULL) {
 904                         if (uname(&u) < 0) {
 905                                 ERR("uname() failed: %m\n");
 906                                 err = -1;
 907                                 goto done;
 908                         }
 909                         kversion = u.release;
 910                 }
 911                 snprintf(dirname_buf, sizeof(dirname_buf),
 912                                 "%s/lib/modules/%s", root,
 913                                 kversion);
 914                 dirname = dirname_buf;
 915         }
 916
 917         ctx = kmod_new(dirname, config_paths);
 918         if (!ctx) {
 919                 ERR("kmod_new() failed!\n");
 920                 err = -1;
 921                 goto done;
 922         }
 923
 924         log_setup_kmod_log(ctx, verbose);
 925
 926         kmod_load_resources(ctx);
 927
 928         if (do_show_config)
 929                 err = show_config(ctx);
 930         else if (do_show_modversions)
 931                 err = show_modversions(ctx, args[0]);
 932         else if (do_show_exports)
 933                 err = show_exports(ctx, args[0]);
 934         else if (do_remove)
 935                 err = rmmod_all(ctx, args, nargs);
 936         else if (use_all)
 937                 err = insmod_all(ctx, args, nargs);
 938         else {
 939                 char *opts;
 940                 err = options_from_array(args, nargs, &opts);
 941                 if (err == 0) {
 942                         err = insmod(ctx, args[0], opts);
 943                         free(opts);
 944                 }
 945         }
 946
 947         kmod_unref(ctx);
 948
 949 done:
 950         log_close();
 951
 952         if (argv != orig_argv)
 953                 free(argv);
 954
 955         free(config_paths);
 956
 957         return err >= 0 ? EXIT_SUCCESS : EXIT_FAILURE;
 958 }
 959
 960 const struct kmod_cmd kmod_cmd_compat_modprobe = {
 961         .name = "modprobe",
 962         .cmd = do_modprobe,
 963         .help = "compat modprobe command",
 964 };