bootdevice.c

   1 /*
   2  * QEMU Boot Device Implement
   3  *
   4  * Copyright (c) 2014 HUAWEI TECHNOLOGIES CO.,LTD.
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a copy
   7  * of this software and associated documentation files (the "Software"), to deal
   8  * in the Software without restriction, including without limitation the rights
   9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  10  * copies of the Software, and to permit persons to whom the Software is
  11  * furnished to do so, subject to the following conditions:
  12  *
  13  * The above copyright notice and this permission notice shall be included in
  14  * all copies or substantial portions of the Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  22  * THE SOFTWARE.
  23  */
  24
  25 #include "sysemu/sysemu.h"
  26 #include "qapi/visitor.h"
  27 #include "qemu/error-report.h"
  28 #include "hw/hw.h"
  29
  30 typedef struct FWBootEntry FWBootEntry;
  31
  32 struct FWBootEntry {
  33     QTAILQ_ENTRY(FWBootEntry) link;
  34     int32_t bootindex;
  35     DeviceState *dev;
  36     char *suffix;
  37 };
  38
  39 static QTAILQ_HEAD(, FWBootEntry) fw_boot_order =
  40     QTAILQ_HEAD_INITIALIZER(fw_boot_order);
  41 static QEMUBootSetHandler *boot_set_handler;
  42 static void *boot_set_opaque;
  43
  44 void qemu_register_boot_set(QEMUBootSetHandler *func, void *opaque)
  45 {
  46     boot_set_handler = func;
  47     boot_set_opaque = opaque;
  48 }
  49
  50 void qemu_boot_set(const char *boot_order, Error **errp)
  51 {
  52     Error *local_err = NULL;
  53
  54     if (!boot_set_handler) {
  55         error_setg(errp, "no function defined to set boot device list for"
  56                          " this architecture");
  57         return;
  58     }
  59
  60     validate_bootdevices(boot_order, &local_err);
  61     if (local_err) {
  62         error_propagate(errp, local_err);
  63         return;
  64     }
  65
  66     boot_set_handler(boot_set_opaque, boot_order, errp);
  67 }
  68
  69 void validate_bootdevices(const char *devices, Error **errp)
  70 {
  71     /* We just do some generic consistency checks */
  72     const char *p;
  73     int bitmap = 0;
  74
  75     for (p = devices; *p != '\0'; p++) {
  76         /* Allowed boot devices are:
  77          * a-b: floppy disk drives
  78          * c-f: IDE disk drives
  79          * g-m: machine implementation dependent drives
  80          * n-p: network devices
  81          * It's up to each machine implementation to check if the given boot
  82          * devices match the actual hardware implementation and firmware
  83          * features.
  84          */
  85         if (*p < 'a' || *p > 'p') {
  86             error_setg(errp, "Invalid boot device '%c'", *p);
  87             return;
  88         }
  89         if (bitmap & (1 << (*p - 'a'))) {
  90             error_setg(errp, "Boot device '%c' was given twice", *p);
  91             return;
  92         }
  93         bitmap |= 1 << (*p - 'a');
  94     }
  95 }
  96
  97 void restore_boot_order(void *opaque)
  98 {
  99     char *normal_boot_order = opaque;
 100     static int first = 1;
 101
 102     /* Restore boot order and remove ourselves after the first boot */
 103     if (first) {
 104         first = 0;
 105         return;
 106     }
 107
 108     qemu_boot_set(normal_boot_order, NULL);
 109
 110     qemu_unregister_reset(restore_boot_order, normal_boot_order);
 111     g_free(normal_boot_order);
 112 }
 113
 114 void check_boot_index(int32_t bootindex, Error **errp)
 115 {
 116     FWBootEntry *i;
 117
 118     if (bootindex >= 0) {
 119         QTAILQ_FOREACH(i, &fw_boot_order, link) {
 120             if (i->bootindex == bootindex) {
 121                 error_setg(errp, "The bootindex %d has already been used",
 122                            bootindex);
 123                 return;
 124             }
 125         }
 126     }
 127 }
 128
 129 void del_boot_device_path(DeviceState *dev, const char *suffix)
 130 {
 131     FWBootEntry *i;
 132
 133     if (dev == NULL) {
 134         return;
 135     }
 136
 137     QTAILQ_FOREACH(i, &fw_boot_order, link) {
 138         if ((!suffix || !g_strcmp0(i->suffix, suffix)) &&
 139              i->dev == dev) {
 140             QTAILQ_REMOVE(&fw_boot_order, i, link);
 141             g_free(i->suffix);
 142             g_free(i);
 143
 144             break;
 145         }
 146     }
 147 }
 148
 149 void add_boot_device_path(int32_t bootindex, DeviceState *dev,
 150                           const char *suffix)
 151 {
 152     FWBootEntry *node, *i;
 153
 154     if (bootindex < 0) {
 155         del_boot_device_path(dev, suffix);
 156         return;
 157     }
 158
 159     assert(dev != NULL || suffix != NULL);
 160
 161     del_boot_device_path(dev, suffix);
 162
 163     node = g_malloc0(sizeof(FWBootEntry));
 164     node->bootindex = bootindex;
 165     node->suffix = g_strdup(suffix);
 166     node->dev = dev;
 167
 168     QTAILQ_FOREACH(i, &fw_boot_order, link) {
 169         if (i->bootindex == bootindex) {
 170             error_report("Two devices with same boot index %d", bootindex);
 171             exit(1);
 172         } else if (i->bootindex < bootindex) {
 173             continue;
 174         }
 175         QTAILQ_INSERT_BEFORE(i, node, link);
 176         return;
 177     }
 178     QTAILQ_INSERT_TAIL(&fw_boot_order, node, link);
 179 }
 180
 181 DeviceState *get_boot_device(uint32_t position)
 182 {
 183     uint32_t counter = 0;
 184     FWBootEntry *i = NULL;
 185     DeviceState *res = NULL;
 186
 187     if (!QTAILQ_EMPTY(&fw_boot_order)) {
 188         QTAILQ_FOREACH(i, &fw_boot_order, link) {
 189             if (counter == position) {
 190                 res = i->dev;
 191                 break;
 192             }
 193             counter++;
 194         }
 195     }
 196     return res;
 197 }
 198
 199 /*
 200  * This function returns null terminated string that consist of new line
 201  * separated device paths.
 202  *
 203  * memory pointed by "size" is assigned total length of the array in bytes
 204  *
 205  */
 206 char *get_boot_devices_list(size_t *size, bool ignore_suffixes)
 207 {
 208     FWBootEntry *i;
 209     size_t total = 0;
 210     char *list = NULL;
 211
 212     QTAILQ_FOREACH(i, &fw_boot_order, link) {
 213         char *devpath = NULL,  *suffix = NULL;
 214         char *bootpath;
 215         char *d;
 216         size_t len;
 217
 218         if (i->dev) {
 219             devpath = qdev_get_fw_dev_path(i->dev);
 220             assert(devpath);
 221         }
 222
 223         if (!ignore_suffixes) {
 224             if (i->dev) {
 225                 d = qdev_get_own_fw_dev_path_from_handler(i->dev->parent_bus,
 226                                                           i->dev);
 227                 if (d) {
 228                     assert(!i->suffix);
 229                     suffix = d;
 230                 } else {
 231                     suffix = g_strdup(i->suffix);
 232                 }
 233             } else {
 234                 suffix = g_strdup(i->suffix);
 235             }
 236         }
 237
 238         bootpath = g_strdup_printf("%s%s",
 239                                    devpath ? devpath : "",
 240                                    suffix ? suffix : "");
 241         g_free(devpath);
 242         g_free(suffix);
 243
 244         if (total) {
 245             list[total-1] = '\n';
 246         }
 247         len = strlen(bootpath) + 1;
 248         list = g_realloc(list, total + len);
 249         memcpy(&list[total], bootpath, len);
 250         total += len;
 251         g_free(bootpath);
 252     }
 253
 254     *size = total;
 255
 256     if (boot_strict && *size > 0) {
 257         list[total-1] = '\n';
 258         list = g_realloc(list, total + 5);
 259         memcpy(&list[total], "HALT", 5);
 260         *size = total + 5;
 261     }
 262     return list;
 263 }
 264
 265 typedef struct {
 266     int32_t *bootindex;
 267     const char *suffix;
 268     DeviceState *dev;
 269 } BootIndexProperty;
 270
 271 static void device_get_bootindex(Object *obj, Visitor *v, void *opaque,
 272                                  const char *name, Error **errp)
 273 {
 274     BootIndexProperty *prop = opaque;
 275     visit_type_int32(v, prop->bootindex, name, errp);
 276 }
 277
 278 static void device_set_bootindex(Object *obj, Visitor *v, void *opaque,
 279                                  const char *name, Error **errp)
 280 {
 281     BootIndexProperty *prop = opaque;
 282     int32_t boot_index;
 283     Error *local_err = NULL;
 284
 285     visit_type_int32(v, &boot_index, name, &local_err);
 286     if (local_err) {
 287         goto out;
 288     }
 289     /* check whether bootindex is present in fw_boot_order list  */
 290     check_boot_index(boot_index, &local_err);
 291     if (local_err) {
 292         goto out;
 293     }
 294     /* change bootindex to a new one */
 295     *prop->bootindex = boot_index;
 296
 297     add_boot_device_path(*prop->bootindex, prop->dev, prop->suffix);
 298
 299 out:
 300     if (local_err) {
 301         error_propagate(errp, local_err);
 302     }
 303 }
 304
 305 static void property_release_bootindex(Object *obj, const char *name,
 306                                        void *opaque)
 307
 308 {
 309     BootIndexProperty *prop = opaque;
 310
 311     del_boot_device_path(prop->dev, prop->suffix);
 312     g_free(prop);
 313 }
 314
 315 void device_add_bootindex_property(Object *obj, int32_t *bootindex,
 316                                    const char *name, const char *suffix,
 317                                    DeviceState *dev, Error **errp)
 318 {
 319     Error *local_err = NULL;
 320     BootIndexProperty *prop = g_malloc0(sizeof(*prop));
 321
 322     prop->bootindex = bootindex;
 323     prop->suffix = suffix;
 324     prop->dev = dev;
 325
 326     object_property_add(obj, name, "int32",
 327                         device_get_bootindex,
 328                         device_set_bootindex,
 329                         property_release_bootindex,
 330                         prop, &local_err);
 331
 332     if (local_err) {
 333         error_propagate(errp, local_err);
 334         g_free(prop);
 335         return;
 336     }
 337     /* initialize devices' bootindex property to -1 */
 338     object_property_set_int(obj, -1, name, NULL);
 339 }