arch/all-pc/boot/grub2-aros/grub-core/commands/nativedisk.c

   1 /*
   2  *  GRUB  --  GRand Unified Bootloader
   3  *  Copyright (C) 2013  Free Software Foundation, Inc.
   4  *
   5  *  GRUB is free software: you can redistribute it and/or modify
   6  *  it under the terms of the GNU General Public License as published by
   7  *  the Free Software Foundation, either version 3 of the License, or
   8  *  (at your option) any later version.
   9  *
  10  *  GRUB is distributed in the hope that it will be useful,
  11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  *  GNU General Public License for more details.
  14  *
  15  *  You should have received a copy of the GNU General Public License
  16  *  along with GRUB.  If not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19 #include <grub/types.h>
  20 #include <grub/misc.h>
  21 #include <grub/mm.h>
  22 #include <grub/err.h>
  23 #include <grub/dl.h>
  24 #include <grub/command.h>
  25 #include <grub/i18n.h>
  26 #include <grub/device.h>
  27 #include <grub/mm.h>
  28 #include <grub/fs.h>
  29 #include <grub/env.h>
  30 #include <grub/file.h>
  31
  32 GRUB_MOD_LICENSE ("GPLv3+");
  33
  34 static const char *modnames_def[] = {
  35   /* FIXME: autogenerate this.  */
  36 #if defined (__i386__) || defined (__x86_64__) || defined (GRUB_MACHINE_MIPS_LOONGSON)
  37   "pata", "ahci", "usbms", "ohci", "uhci", "ehci"
  38 #elif defined (GRUB_MACHINE_MIPS_QEMU_MIPS)
  39   "pata"
  40 #else
  41 #error "Fill this"
  42 #endif
  43  };
  44
  45 static grub_err_t
  46 get_uuid (const char *name, char **uuid, int getnative)
  47 {
  48   grub_device_t dev;
  49   grub_fs_t fs = 0;
  50
  51   *uuid = 0;
  52
  53   dev = grub_device_open (name);
  54   if (!dev)
  55     return grub_errno;
  56
  57   if (!dev->disk)
  58     {
  59       grub_dprintf ("nativedisk", "Skipping non-disk\n");
  60       grub_device_close (dev);
  61       return 0;
  62     }
  63
  64   switch (dev->disk->dev->id)
  65     {
  66       /* Firmware disks.  */
  67     case GRUB_DISK_DEVICE_BIOSDISK_ID:
  68     case GRUB_DISK_DEVICE_OFDISK_ID:
  69     case GRUB_DISK_DEVICE_EFIDISK_ID:
  70     case GRUB_DISK_DEVICE_NAND_ID:
  71     case GRUB_DISK_DEVICE_ARCDISK_ID:
  72     case GRUB_DISK_DEVICE_HOSTDISK_ID:
  73     case GRUB_DISK_DEVICE_UBOOTDISK_ID:
  74       break;
  75
  76       /* Native disks.  */
  77     case GRUB_DISK_DEVICE_ATA_ID:
  78     case GRUB_DISK_DEVICE_SCSI_ID:
  79     case GRUB_DISK_DEVICE_XEN:
  80       if (getnative)
  81         break;
  82
  83       /* Virtual disks.  */
  84       /* GRUB dynamically generated files.  */
  85     case GRUB_DISK_DEVICE_PROCFS_ID:
  86       /* To access through host OS routines (grub-emu only).  */
  87     case GRUB_DISK_DEVICE_HOST_ID:
  88       /* To access coreboot roms.  */
  89     case GRUB_DISK_DEVICE_CBFSDISK_ID:
  90       /* GRUB-only memdisk. Can't match any of firmware devices.  */
  91     case GRUB_DISK_DEVICE_MEMDISK_ID:
  92       grub_dprintf ("nativedisk", "Skipping native disk %s\n",
  93                     dev->disk->name);
  94       grub_device_close (dev);
  95       return 0;
  96
  97       /* FIXME: those probably need special handling.  */
  98     case GRUB_DISK_DEVICE_LOOPBACK_ID:
  99     case GRUB_DISK_DEVICE_DISKFILTER_ID:
 100     case GRUB_DISK_DEVICE_CRYPTODISK_ID:
 101       break;
 102     }
 103   if (dev)
 104     fs = grub_fs_probe (dev);
 105   if (!fs)
 106     {
 107       grub_device_close (dev);
 108       return grub_errno;
 109     }
 110   if (!fs->uuid || fs->uuid (dev, uuid) || !*uuid)
 111     {
 112       grub_device_close (dev);
 113
 114       if (!grub_errno)
 115         grub_error (GRUB_ERR_NOT_IMPLEMENTED_YET,
 116                     N_("%s does not support UUIDs"), fs->name);
 117
 118       return grub_errno;
 119     }
 120   grub_device_close (dev);
 121   return GRUB_ERR_NONE;
 122 }
 123
 124 struct search_ctx
 125 {
 126   char *root_uuid;
 127   char *prefix_uuid;
 128   const char *prefix_path;
 129   int prefix_found, root_found;
 130 };
 131
 132 static int
 133 iterate_device (const char *name, void *data)
 134 {
 135   struct search_ctx *ctx = data;
 136   char *cur_uuid;
 137
 138   if (get_uuid (name, &cur_uuid, 1))
 139     {
 140       if (grub_errno == GRUB_ERR_UNKNOWN_FS)
 141         grub_errno = 0;
 142       grub_print_error ();
 143       return 0;
 144     }
 145
 146   grub_dprintf ("nativedisk", "checking %s: %s\n", name,
 147                 cur_uuid);
 148   if (ctx->prefix_uuid && grub_strcasecmp (cur_uuid, ctx->prefix_uuid) == 0)
 149     {
 150       char *prefix;
 151       prefix = grub_xasprintf ("(%s)/%s", name, ctx->prefix_path);
 152       grub_env_set ("prefix", prefix);
 153       grub_free (prefix);
 154       ctx->prefix_found = 1;
 155     }
 156   if (ctx->root_uuid && grub_strcasecmp (cur_uuid, ctx->root_uuid) == 0)
 157     {
 158       grub_env_set ("root", name);
 159       ctx->root_found = 1;
 160     }
 161   return ctx->prefix_found && ctx->root_found;
 162 }
 163
 164 static grub_err_t
 165 grub_cmd_nativedisk (grub_command_t cmd __attribute__ ((unused)),
 166                      int argc, char **args_in)
 167 {
 168   char *uuid_root = 0, *uuid_prefix, *prefdev = 0;
 169   const char *prefix = 0;
 170   const char *path_prefix = 0;
 171   int mods_loaded = 0;
 172   grub_dl_t *mods;
 173   const char **args;
 174   int i;
 175
 176   if (argc == 0)
 177     {
 178       argc = ARRAY_SIZE (modnames_def);
 179       args = modnames_def;
 180     }
 181   else
 182     args = (const char **) args_in;
 183
 184   prefix = grub_env_get ("prefix");
 185
 186   if (! prefix)
 187     return grub_error (GRUB_ERR_FILE_NOT_FOUND, N_("variable `%s' isn't set"), "prefix");
 188
 189   if (prefix)
 190     path_prefix = (prefix[0] == '(') ? grub_strchr (prefix, ')') : NULL;
 191   if (path_prefix)
 192     path_prefix++;
 193   else
 194     path_prefix = prefix;
 195
 196   mods = grub_malloc (argc * sizeof (mods[0]));
 197   if (!mods)
 198     return grub_errno;
 199
 200   if (get_uuid (NULL, &uuid_root, 0))
 201     return grub_errno;
 202
 203   prefdev = grub_file_get_device_name (prefix);
 204   if (grub_errno)
 205     {
 206       grub_print_error ();
 207       prefdev = 0;
 208     }
 209
 210   if (get_uuid (prefdev, &uuid_prefix, 0))
 211     {
 212       grub_free (uuid_root);
 213       return grub_errno;
 214     }
 215
 216   grub_dprintf ("nativedisk", "uuid_prefix = %s, uuid_root = %s\n",
 217                 uuid_prefix, uuid_root);
 218
 219   for (mods_loaded = 0; mods_loaded < argc; mods_loaded++)
 220     {
 221       char *filename;
 222       grub_dl_t mod;
 223       grub_file_t file = NULL;
 224       grub_ssize_t size;
 225       void *core = 0;
 226
 227       mod = grub_dl_get (args[mods_loaded]);
 228       if (mod)
 229         {
 230           mods[mods_loaded] = 0;
 231           continue;
 232         }
 233
 234       filename = grub_xasprintf ("%s/" GRUB_TARGET_CPU "-" GRUB_PLATFORM "/%s.mod",
 235                                  prefix, args[mods_loaded]);
 236       if (! filename)
 237         goto fail;
 238
 239       file = grub_file_open (filename);
 240       grub_free (filename);
 241       if (! file)
 242         goto fail;
 243
 244       size = grub_file_size (file);
 245       core = grub_malloc (size);
 246       if (! core)
 247         {
 248           grub_file_close (file);
 249           goto fail;
 250         }
 251
 252       if (grub_file_read (file, core, size) != (grub_ssize_t) size)
 253         {
 254           grub_file_close (file);
 255           grub_free (core);
 256           goto fail;
 257         }
 258
 259       grub_file_close (file);
 260
 261       mods[mods_loaded] = grub_dl_load_core_noinit (core, size);
 262       if (! mods[mods_loaded])
 263         goto fail;
 264     }
 265
 266   for (i = 0; i < argc; i++)
 267     if (mods[i])
 268       grub_dl_init (mods[i]);
 269
 270   if (uuid_prefix || uuid_root)
 271     {
 272       struct search_ctx ctx;
 273       grub_fs_autoload_hook_t saved_autoload;
 274
 275       /* No need to autoload FS since obviously we already have the necessary fs modules.  */
 276       saved_autoload = grub_fs_autoload_hook;
 277       grub_fs_autoload_hook = 0;
 278
 279       ctx.root_uuid = uuid_root;
 280       ctx.prefix_uuid = uuid_prefix;
 281       ctx.prefix_path = path_prefix;
 282       ctx.prefix_found = !uuid_prefix;
 283       ctx.root_found = !uuid_root;
 284
 285       /* FIXME: try to guess the correct values.  */
 286       grub_device_iterate (iterate_device, &ctx);
 287
 288       grub_fs_autoload_hook = saved_autoload;
 289     }
 290   grub_free (uuid_root);
 291   grub_free (uuid_prefix);
 292
 293   return GRUB_ERR_NONE;
 294
 295  fail:
 296   grub_free (uuid_root);
 297   grub_free (uuid_prefix);
 298
 299   for (i = 0; i < mods_loaded; i++)
 300     if (mods[i])
 301       {
 302         mods[i]->fini = 0;
 303         grub_dl_unload (mods[i]);
 304       }
 305   return grub_errno;
 306 }
 307
 308 static grub_command_t cmd;
 309
 310 GRUB_MOD_INIT(nativedisk)
 311 {
 312   cmd = grub_register_command ("nativedisk", grub_cmd_nativedisk, N_("[MODULE1 MODULE2 ...]"),
 313                                N_("Switch to native disk drivers. If no modules are specified default set (pata,ahci,usbms,ohci,uhci,ehci) is used"));
 314 }
 315
 316 GRUB_MOD_FINI(nativedisk)
 317 {
 318   grub_unregister_command (cmd);
 319 }