X-Git-Url: http://git.ozlabs.org/?p=petitboot;a=blobdiff_plain;f=discover%2Fdevice-handler.c;h=120f11f52aa819639ece6a1bffaa49d0772921ae;hp=c661fbe2eb3c5aa9189cb720e5c12e064a296360;hb=01dac4f074301097d10abb6130eb68f99f56a1b9;hpb=75b1278f2ab0dad22f393e4a002f797dcb8c8a3b diff --git a/discover/device-handler.c b/discover/device-handler.c index c661fbe..120f11f 100644 --- a/discover/device-handler.c +++ b/discover/device-handler.c @@ -1,111 +1,81 @@ - #include #include +#include #include #include #include +#include +#include #include #include +#include #include #include #include #include #include +#include +#include +#include + +#include +#include +#include +#include #include "device-handler.h" #include "discover-server.h" +#include "user-event.h" +#include "platform.h" #include "event.h" #include "parser.h" -#include "udev.h" +#include "resource.h" #include "paths.h" +#include "sysinfo.h" #include "boot.h" +#include "udev.h" +#include "network.h" struct device_handler { struct discover_server *server; int dry_run; + struct pb_udev *udev; + struct network *network; + struct user_event *user_event; + struct discover_device **devices; unsigned int n_devices; -}; -/** - * context_commit - Commit a temporary discovery context to the handler, - * and notify the clients about any new options / devices - */ -static void context_commit(struct device_handler *handler, - struct discover_context *ctx) -{ - struct discover_device *dev = ctx->device; - struct discover_boot_option *opt, *tmp; - unsigned int i, existing_device = 0; + struct waitset *waitset; + struct waiter *timeout_waiter; + bool autoboot_enabled; + unsigned int sec_to_boot; - /* do we already have this device? */ - for (i = 0; i < handler->n_devices; i++) { - if (ctx->device == handler->devices[i]) { - existing_device = 1; - break; - } - } + struct discover_boot_option *default_boot_option; + struct list unresolved_boot_options; - /* if not already present, add the device to the handler's array */ - if (!existing_device) { - handler->n_devices++; - handler->devices = talloc_realloc(handler, handler->devices, - struct discover_device *, handler->n_devices); - handler->devices[handler->n_devices - 1] = dev; - talloc_steal(handler, dev); + struct boot_task *pending_boot; + bool pending_boot_is_default; +}; - discover_server_notify_device_add(handler->server, dev->device); - } +static int mount_device(struct discover_device *dev); +static int umount_device(struct discover_device *dev); +static int device_handler_init_sources(struct device_handler *handler); +static void device_handler_reinit_sources(struct device_handler *handler); - /* move boot options from the context to the device */ - list_for_each_entry_safe(&ctx->boot_options, opt, tmp, list) { - list_remove(&opt->list); - list_add(&dev->boot_options, &opt->list); - talloc_steal(dev, opt); - discover_server_notify_boot_option_add(handler->server, - opt->option); - } -} +static void device_handler_update_lang(const char *lang); void discover_context_add_boot_option(struct discover_context *ctx, struct discover_boot_option *boot_option) { - list_add(&ctx->boot_options, &boot_option->list); + boot_option->source = ctx->parser; + list_add_tail(&ctx->boot_options, &boot_option->list); talloc_steal(ctx, boot_option); } -/** - * device_handler_remove - Remove a device from the handler device array. - */ - -static void device_handler_remove(struct device_handler *handler, - struct discover_device *device) -{ - unsigned int i; - - for (i = 0; i < handler->n_devices; i++) - if (handler->devices[i] == device) - break; - - if (i == handler->n_devices) { - assert(0 && "unknown device"); - return; - } - - handler->n_devices--; - memmove(&handler->devices[i], &handler->devices[i + 1], - (handler->n_devices - i) * sizeof(handler->devices[0])); - handler->devices = talloc_realloc(handler, handler->devices, - struct discover_device *, handler->n_devices); - - discover_server_notify_device_remove(handler->server, device->device); - - talloc_free(device); -} - /** * device_handler_get_device_count - Get the count of current handler devices. */ @@ -130,92 +100,101 @@ const struct discover_device *device_handler_get_device( return handler->devices[index]; } -static int mount_device(struct discover_device *dev) +struct discover_boot_option *discover_boot_option_create( + struct discover_context *ctx, + struct discover_device *device) { - const char *argv[6]; - - if (!dev->mount_path) - dev->mount_path = join_paths(dev, mount_base(), - dev->device_path); - - if (pb_mkdir_recursive(dev->mount_path)) - pb_log("couldn't create mount directory %s: %s\n", - dev->mount_path, strerror(errno)); - - argv[0] = pb_system_apps.mount; - argv[1] = dev->device_path; - argv[2] = dev->mount_path; - argv[3] = "-o"; - argv[4] = "ro"; - argv[5] = NULL; + struct discover_boot_option *opt; - if (pb_run_cmd(argv, 1, 0)) { + opt = talloc_zero(ctx, struct discover_boot_option); + opt->option = talloc_zero(opt, struct boot_option); + opt->device = device; - /* Retry mount without ro option. */ + return opt; +} - argv[0] = pb_system_apps.mount; - argv[1] = dev->device_path; - argv[2] = dev->mount_path; - argv[3] = NULL; +static int device_match_uuid(struct discover_device *dev, const char *uuid) +{ + return dev->uuid && !strcmp(dev->uuid, uuid); +} - if (pb_run_cmd(argv, 1, 0)) - goto out_rmdir; - } +static int device_match_label(struct discover_device *dev, const char *label) +{ + return dev->label && !strcmp(dev->label, label); +} - return 0; +static int device_match_id(struct discover_device *dev, const char *id) +{ + return !strcmp(dev->device->id, id); +} -out_rmdir: - pb_rmdir_recursive(mount_base(), dev->mount_path); - return -1; +static int device_match_serial(struct discover_device *dev, const char *serial) +{ + const char *val = discover_device_get_param(dev, "ID_SERIAL"); + return val && !strcmp(val, serial); } -static int umount_device(struct discover_device *dev) +static struct discover_device *device_lookup( + struct device_handler *device_handler, + int (match_fn)(struct discover_device *, const char *), + const char *str) { - int status; - pid_t pid; + struct discover_device *dev; + unsigned int i; - if (!dev->mount_path) - return 0; + if (!str) + return NULL; - pid = fork(); - if (pid == -1) { - pb_log("%s: fork failed: %s\n", __func__, strerror(errno)); - return -1; - } + for (i = 0; i < device_handler->n_devices; i++) { + dev = device_handler->devices[i]; - if (pid == 0) { - execl(pb_system_apps.umount, pb_system_apps.umount, - dev->mount_path, NULL); - exit(EXIT_FAILURE); + if (match_fn(dev, str)) + return dev; } - if (waitpid(pid, &status, 0) == -1) { - pb_log("%s: waitpid failed: %s\n", __func__, - strerror(errno)); - return -1; - } + return NULL; +} - if (!WIFEXITED(status) || WEXITSTATUS(status) != 0) - return -1; +struct discover_device *device_lookup_by_name(struct device_handler *handler, + const char *name) +{ + if (!strncmp(name, "/dev/", strlen("/dev/"))) + name += strlen("/dev/"); - pb_rmdir_recursive(mount_base(), dev->mount_path); + return device_lookup_by_id(handler, name); +} - return 0; +struct discover_device *device_lookup_by_uuid( + struct device_handler *device_handler, + const char *uuid) +{ + return device_lookup(device_handler, device_match_uuid, uuid); +} + +struct discover_device *device_lookup_by_label( + struct device_handler *device_handler, + const char *label) +{ + return device_lookup(device_handler, device_match_label, label); } -static struct discover_device *find_device(struct device_handler *handler, +struct discover_device *device_lookup_by_id( + struct device_handler *device_handler, const char *id) { - struct discover_device *dev; - unsigned int i; + return device_lookup(device_handler, device_match_id, id); +} - for (i = 0; i < handler->n_devices; i++) { - dev = handler->devices[i]; - if (!strcmp(dev->device->id, id)) - return dev; - } +struct discover_device *device_lookup_by_serial( + struct device_handler *device_handler, + const char *serial) +{ + return device_lookup(device_handler, device_match_serial, serial); +} - return NULL; +void device_handler_destroy(struct device_handler *handler) +{ + talloc_free(handler); } static int destroy_device(void *arg) @@ -227,280 +206,557 @@ static int destroy_device(void *arg) return 0; } -static struct discover_device *discover_device_create( - struct device_handler *handler, - struct discover_context *ctx, - struct event *event) +struct discover_device *discover_device_create(struct device_handler *handler, + const char *id) { struct discover_device *dev; - const char *devname; - dev = find_device(handler, event->device); + dev = device_lookup_by_id(handler, id); if (dev) return dev; - dev = talloc_zero(ctx, struct discover_device); + dev = talloc_zero(handler, struct discover_device); dev->device = talloc_zero(dev, struct device); + dev->device->id = talloc_strdup(dev->device, id); + list_init(&dev->params); list_init(&dev->boot_options); - devname = event_get_param(ctx->event, "DEVNAME"); - if (devname) - dev->device_path = talloc_strdup(dev, devname); - - dev->device->id = talloc_strdup(dev, event->device); - talloc_set_destructor(dev, destroy_device); return dev; } -struct discover_boot_option *discover_boot_option_create( - struct discover_context *ctx, - struct discover_device *device) +struct discover_device_param { + char *name; + char *value; + struct list_item list; +}; + +void discover_device_set_param(struct discover_device *device, + const char *name, const char *value) { - struct discover_boot_option *opt; + struct discover_device_param *param; + bool found = false; - opt = talloc_zero(ctx, struct discover_boot_option); - opt->option = talloc_zero(opt, struct boot_option); - opt->device = device; + list_for_each_entry(&device->params, param, list) { + if (!strcmp(param->name, name)) { + found = true; + break; + } + } - return opt; + if (!found) { + if (!value) + return; + param = talloc(device, struct discover_device_param); + param->name = talloc_strdup(param, name); + list_add(&device->params, ¶m->list); + } else { + if (!value) { + list_remove(¶m->list); + talloc_free(param); + return; + } + talloc_free(param->value); + } + + param->value = talloc_strdup(param, value); } +const char *discover_device_get_param(struct discover_device *device, + const char *name) +{ + struct discover_device_param *param; + + list_for_each_entry(&device->params, param, list) { + if (!strcmp(param->name, name)) + return param->value; + } + return NULL; +} -static int handle_add_udev_event(struct device_handler *handler, - struct event *event) +struct device_handler *device_handler_init(struct discover_server *server, + struct waitset *waitset, int dry_run) { - struct discover_context *ctx; - struct discover_device *dev; - const char *param; + struct device_handler *handler; int rc; - /* create our context */ - ctx = talloc(handler, struct discover_context); - ctx->event = event; - list_init(&ctx->boot_options); + handler = talloc_zero(NULL, struct device_handler); + handler->server = server; + handler->waitset = waitset; + handler->dry_run = dry_run; + handler->autoboot_enabled = config_get()->autoboot_enabled; - /* create our top-level device */ - dev = discover_device_create(handler, ctx, event); + list_init(&handler->unresolved_boot_options); - ctx->device = dev; + /* set up our mount point base */ + pb_mkdir_recursive(mount_base()); - /* try to parse UUID and labels */ - param = event_get_param(ctx->event, "ID_FS_UUID"); - if (param) - dev->uuid = talloc_strdup(dev, param); + parser_init(); - param = event_get_param(ctx->event, "ID_FS_LABEL"); - if (param) - dev->label = talloc_strdup(dev, param); + if (config_get()->safe_mode) + return handler; - rc = mount_device(dev); + rc = device_handler_init_sources(handler); if (rc) { - talloc_free(ctx); - return 0; + talloc_free(handler); + return NULL; } - /* run the parsers. This will populate the ctx's boot_option list. */ - iterate_parsers(ctx); - - /* add discovered stuff to the handler */ - context_commit(handler, ctx); - - talloc_free(ctx); - - return 0; + return handler; } -static int handle_remove_udev_event(struct device_handler *handler, - struct event *event) +void device_handler_reinit(struct device_handler *handler) { - struct discover_device *dev; + struct discover_boot_option *opt, *tmp; + unsigned int i; - dev = find_device(handler, event->device); - if (!dev) - return 0; + device_handler_cancel_default(handler); - /* remove device from handler device array */ - device_handler_remove(handler, dev); + /* free unresolved boot options */ + list_for_each_entry_safe(&handler->unresolved_boot_options, + opt, tmp, list) + talloc_free(opt); + list_init(&handler->unresolved_boot_options); - return 0; + /* drop all devices */ + for (i = 0; i < handler->n_devices; i++) + discover_server_notify_device_remove(handler->server, + handler->devices[i]->device); + + talloc_free(handler->devices); + handler->devices = NULL; + handler->n_devices = 0; + + device_handler_reinit_sources(handler); } -static int handle_add_user_event(struct device_handler *handler, - struct event *event) +void device_handler_remove(struct device_handler *handler, + struct discover_device *device) { - struct discover_context *ctx; - struct discover_device *dev; - int rc; + struct discover_boot_option *opt, *tmp; + unsigned int i; - assert(event->device); + for (i = 0; i < handler->n_devices; i++) + if (handler->devices[i] == device) + break; - ctx = talloc(handler, struct discover_context); - ctx->event = event; - list_init(&ctx->boot_options); + if (i == handler->n_devices) { + talloc_free(device); + return; + } + + /* Free any unresolved options, as they're currently allocated + * against the handler */ + list_for_each_entry_safe(&handler->unresolved_boot_options, + opt, tmp, list) { + if (opt->device != device) + continue; + list_remove(&opt->list); + talloc_free(opt); + } - dev = discover_device_create(handler, ctx, event); - ctx->device = dev; + /* if this is a network device, we have to unregister it from the + * network code */ + if (device->device->type == DEVICE_TYPE_NETWORK) + network_unregister_device(handler->network, device); - rc = parse_user_event(ctx, event); + handler->n_devices--; + memmove(&handler->devices[i], &handler->devices[i + 1], + (handler->n_devices - i) * sizeof(handler->devices[0])); + handler->devices = talloc_realloc(handler, handler->devices, + struct discover_device *, handler->n_devices); - if (!rc) - context_commit(handler, ctx); + if (device->notified) + discover_server_notify_device_remove(handler->server, + device->device); - return rc; + talloc_free(device); } -static int handle_remove_user_event(struct device_handler *handler, - struct event *event) +static void boot_status(void *arg, struct boot_status *status) { - struct discover_device *dev = find_device(handler, event->device); + struct device_handler *handler = arg; - if (!dev) - return 0; + discover_server_notify_boot_status(handler->server, status); +} - /* remove device from handler device array */ - device_handler_remove(handler, dev); +static void countdown_status(struct device_handler *handler, + struct discover_boot_option *opt, unsigned int sec) +{ + struct boot_status status; - return 0; -} + status.type = BOOT_STATUS_INFO; + status.progress = -1; + status.detail = NULL; + status.message = talloc_asprintf(handler, + _("Booting in %d sec: %s"), sec, opt->option->name); -typedef int (*event_handler)(struct device_handler *, struct event *); + discover_server_notify_boot_status(handler->server, &status); -static event_handler handlers[EVENT_TYPE_MAX][EVENT_ACTION_MAX] = { - [EVENT_TYPE_UDEV] = { - [EVENT_ACTION_ADD] = handle_add_udev_event, - [EVENT_ACTION_REMOVE] = handle_remove_udev_event, - }, - [EVENT_TYPE_USER] = { - [EVENT_ACTION_ADD] = handle_add_user_event, - [EVENT_ACTION_REMOVE] = handle_remove_user_event, - } -}; + talloc_free(status.message); +} -int device_handler_event(struct device_handler *handler, - struct event *event) +static int default_timeout(void *arg) { - if (event->type >= EVENT_TYPE_MAX || - event->action >= EVENT_ACTION_MAX || - !handlers[event->type][event->action]) { - pb_log("%s unknown type/action: %d/%d\n", __func__, - event->type, event->action); + struct device_handler *handler = arg; + struct discover_boot_option *opt; + + if (!handler->default_boot_option) return 0; - } - return handlers[event->type][event->action](handler, event); -} + if (handler->pending_boot) + return 0; -struct device_handler *device_handler_init(struct discover_server *server, - int dry_run) -{ - struct device_handler *handler; + opt = handler->default_boot_option; - handler = talloc(NULL, struct device_handler); - handler->devices = NULL; - handler->n_devices = 0; - handler->server = server; - handler->dry_run = dry_run; + if (handler->sec_to_boot) { + countdown_status(handler, opt, handler->sec_to_boot); + handler->sec_to_boot--; + handler->timeout_waiter = waiter_register_timeout( + handler->waitset, 1000, + default_timeout, handler); + return 0; + } - /* set up our mount point base */ - pb_mkdir_recursive(mount_base()); + handler->timeout_waiter = NULL; - parser_init(); + pb_log("Timeout expired, booting default option %s\n", opt->option->id); - return handler; + handler->pending_boot = boot(handler, handler->default_boot_option, + NULL, handler->dry_run, boot_status, handler); + handler->pending_boot_is_default = true; + return 0; } -void device_handler_destroy(struct device_handler *handler) +static bool priority_match(struct boot_priority *prio, + struct discover_boot_option *opt) { - talloc_free(handler); + return prio->type == opt->device->device->type || + prio->type == DEVICE_TYPE_ANY; } -static int device_match_path(struct discover_device *dev, const char *path) +static int default_option_priority(struct discover_boot_option *opt) { - return !strcmp(dev->device_path, path); + const struct config *config; + struct boot_priority *prio; + unsigned int i; + + config = config_get(); + + for (i = 0; i < config->n_boot_priorities; i++) { + prio = &config->boot_priorities[i]; + if (priority_match(prio, opt)) + return prio->priority; + } + + return 0; } -static int device_match_uuid(struct discover_device *dev, const char *uuid) +static bool device_allows_default(struct discover_device *dev) { - return dev->uuid && !strcmp(dev->uuid, uuid); + const char *dev_str; + + dev_str = config_get()->boot_device; + + if (!dev_str || !strlen(dev_str)) + return true; + + /* default devices are specified by UUIDs at present */ + if (strcmp(dev->uuid, dev_str)) + return false; + + return true; } -static int device_match_label(struct discover_device *dev, const char *label) +static void set_default(struct device_handler *handler, + struct discover_boot_option *opt) { - return dev->label && !strcmp(dev->label, label); + int new_prio; + + if (!handler->autoboot_enabled) + return; + + /* do we allow default-booting from this device? */ + if (!device_allows_default(opt->device)) + return; + + new_prio = default_option_priority(opt); + + /* A negative priority indicates that we don't want to boot this device + * by default */ + if (new_prio < 0) + return; + + /* Resolve any conflicts: if we have a new default option, it only + * replaces the current if it has a higher priority. */ + if (handler->default_boot_option) { + int cur_prio; + + cur_prio = default_option_priority( + handler->default_boot_option); + + if (new_prio > cur_prio) { + handler->default_boot_option = opt; + /* extend the timeout a little, so the user sees some + * indication of the change */ + handler->sec_to_boot += 2; + } + + return; + } + + handler->sec_to_boot = config_get()->autoboot_timeout_sec; + handler->default_boot_option = opt; + + pb_log("Boot option %s set as default, timeout %u sec.\n", + opt->option->id, handler->sec_to_boot); + + default_timeout(handler); } -static int device_match_id(struct discover_device *dev, const char *id) +static bool resource_is_resolved(struct resource *res) { - return !strcmp(dev->device->id, id); + return !res || res->resolved; } -static struct discover_device *device_lookup( - struct device_handler *device_handler, - int (match_fn)(struct discover_device *, const char *), - const char *str) +/* We only use this in an assert, which will disappear if we're compiling + * with NDEBUG, so we need the 'used' attribute for these builds */ +static bool __attribute__((used)) boot_option_is_resolved( + struct discover_boot_option *opt) { - struct discover_device *dev; - unsigned int i; + return resource_is_resolved(opt->boot_image) && + resource_is_resolved(opt->initrd) && + resource_is_resolved(opt->dtb) && + resource_is_resolved(opt->icon); +} - if (!str) - return NULL; +static bool resource_resolve(struct resource *res, const char *name, + struct discover_boot_option *opt, + struct device_handler *handler) +{ + struct parser *parser = opt->source; - for (i = 0; i < device_handler->n_devices; i++) { - dev = device_handler->devices[i]; + if (resource_is_resolved(res)) + return true; - if (match_fn(dev, str)) - return dev; - } + pb_debug("Attempting to resolve resource %s->%s with parser %s\n", + opt->option->id, name, parser->name); + parser->resolve_resource(handler, res); - return NULL; + return res->resolved; } -struct discover_device *device_lookup_by_name(struct device_handler *handler, - const char *name) +static bool boot_option_resolve(struct discover_boot_option *opt, + struct device_handler *handler) { - struct discover_device *dev; - char *path; + return resource_resolve(opt->boot_image, "boot_image", opt, handler) && + resource_resolve(opt->initrd, "initrd", opt, handler) && + resource_resolve(opt->dtb, "dtb", opt, handler) && + resource_resolve(opt->icon, "icon", opt, handler); +} - if (strncmp(name, "/dev/", strlen("/dev/"))) - path = talloc_asprintf(NULL, "/dev/%s", name); - else - path = talloc_strdup(NULL, name); +static void boot_option_finalise(struct device_handler *handler, + struct discover_boot_option *opt) +{ + assert(boot_option_is_resolved(opt)); + + /* check that the parsers haven't set any of the final data */ + assert(!opt->option->boot_image_file); + assert(!opt->option->initrd_file); + assert(!opt->option->dtb_file); + assert(!opt->option->icon_file); + assert(!opt->option->device_id); + + if (opt->boot_image) + opt->option->boot_image_file = opt->boot_image->url->full; + if (opt->initrd) + opt->option->initrd_file = opt->initrd->url->full; + if (opt->dtb) + opt->option->dtb_file = opt->dtb->url->full; + if (opt->icon) + opt->option->icon_file = opt->icon->url->full; + + opt->option->device_id = opt->device->device->id; + + if (opt->option->is_default) + set_default(handler, opt); +} - dev = device_lookup_by_path(handler, path); +static void notify_boot_option(struct device_handler *handler, + struct discover_boot_option *opt) +{ + struct discover_device *dev = opt->device; - talloc_free(path); + if (!dev->notified) + discover_server_notify_device_add(handler->server, + opt->device->device); + dev->notified = true; + discover_server_notify_boot_option_add(handler->server, opt->option); +} - return dev; +static void process_boot_option_queue(struct device_handler *handler) +{ + struct discover_boot_option *opt, *tmp; + + list_for_each_entry_safe(&handler->unresolved_boot_options, + opt, tmp, list) { + + pb_debug("queue: attempting resolution for %s\n", + opt->option->id); + + if (!boot_option_resolve(opt, handler)) + continue; + + pb_debug("\tresolved!\n"); + + list_remove(&opt->list); + list_add_tail(&opt->device->boot_options, &opt->list); + talloc_steal(opt->device, opt); + boot_option_finalise(handler, opt); + notify_boot_option(handler, opt); + } } -struct discover_device *device_lookup_by_path( - struct device_handler *device_handler, - const char *path) +struct discover_context *device_handler_discover_context_create( + struct device_handler *handler, + struct discover_device *device) { - return device_lookup(device_handler, device_match_path, path); + struct discover_context *ctx; + + ctx = talloc_zero(handler, struct discover_context); + ctx->device = device; + list_init(&ctx->boot_options); + + return ctx; } -struct discover_device *device_lookup_by_uuid( - struct device_handler *device_handler, - const char *uuid) +/** + * context_commit - Commit a temporary discovery context to the handler, + * and notify the clients about any new options / devices + */ +void device_handler_discover_context_commit(struct device_handler *handler, + struct discover_context *ctx) { - return device_lookup(device_handler, device_match_uuid, uuid); + struct discover_device *dev = ctx->device; + struct discover_boot_option *opt, *tmp; + + if (!device_lookup_by_id(handler, dev->device->id)) + device_handler_add_device(handler, dev); + + /* move boot options from the context to the device */ + list_for_each_entry_safe(&ctx->boot_options, opt, tmp, list) { + list_remove(&opt->list); + + if (boot_option_resolve(opt, handler)) { + pb_log("boot option %s is resolved, " + "sending to clients\n", + opt->option->id); + list_add_tail(&dev->boot_options, &opt->list); + talloc_steal(dev, opt); + boot_option_finalise(handler, opt); + notify_boot_option(handler, opt); + } else { + if (!opt->source->resolve_resource) { + pb_log("parser %s gave us an unresolved " + "resource (%s), but no way to " + "resolve it\n", + opt->source->name, opt->option->id); + talloc_free(opt); + } else { + pb_log("boot option %s is unresolved, " + "adding to queue\n", + opt->option->id); + list_add(&handler->unresolved_boot_options, + &opt->list); + talloc_steal(handler, opt); + } + } + } } -struct discover_device *device_lookup_by_label( - struct device_handler *device_handler, - const char *label) +void device_handler_add_device(struct device_handler *handler, + struct discover_device *device) { - return device_lookup(device_handler, device_match_label, label); + handler->n_devices++; + handler->devices = talloc_realloc(handler, handler->devices, + struct discover_device *, handler->n_devices); + handler->devices[handler->n_devices - 1] = device; + + if (device->device->type == DEVICE_TYPE_NETWORK) + network_register_device(handler->network, device); } -struct discover_device *device_lookup_by_id( - struct device_handler *device_handler, - const char *id) +/* Start discovery on a hotplugged device. The device will be in our devices + * array, but has only just been initialised by the hotplug source. + */ +int device_handler_discover(struct device_handler *handler, + struct discover_device *dev) { - return device_lookup(device_handler, device_match_id, id); + struct discover_context *ctx; + int rc; + + process_boot_option_queue(handler); + + /* create our context */ + ctx = device_handler_discover_context_create(handler, dev); + + rc = mount_device(dev); + if (rc) + goto out; + + /* add this device to our system info */ + system_info_register_blockdev(dev->device->id, dev->uuid, + dev->mount_path); + + /* run the parsers. This will populate the ctx's boot_option list. */ + iterate_parsers(ctx); + + /* add discovered stuff to the handler */ + device_handler_discover_context_commit(handler, ctx); + +out: + talloc_free(ctx); + + return 0; +} + +/* Incoming dhcp event */ +int device_handler_dhcp(struct device_handler *handler, + struct discover_device *dev, struct event *event) +{ + struct discover_context *ctx; + + /* create our context */ + ctx = device_handler_discover_context_create(handler, dev); + ctx->event = event; + + iterate_parsers(ctx); + + device_handler_discover_context_commit(handler, ctx); + + talloc_free(ctx); + + return 0; +} + +/* incoming conf event */ +int device_handler_conf(struct device_handler *handler, + struct discover_device *dev, struct pb_url *url) +{ + struct discover_context *ctx; + + /* create our context */ + ctx = device_handler_discover_context_create(handler, dev); + ctx->conf_url = url; + + iterate_parsers(ctx); + + device_handler_discover_context_commit(handler, ctx); + + talloc_free(ctx); + + return 0; } static struct discover_boot_option *find_boot_option_by_id( @@ -523,9 +779,448 @@ static struct discover_boot_option *find_boot_option_by_id( void device_handler_boot(struct device_handler *handler, struct boot_command *cmd) { - struct discover_boot_option *opt; + struct discover_boot_option *opt = NULL; - opt = find_boot_option_by_id(handler, cmd->option_id); + if (cmd->option_id && strlen(cmd->option_id)) + opt = find_boot_option_by_id(handler, cmd->option_id); - boot(handler, opt, cmd, handler->dry_run); + if (handler->pending_boot) + boot_cancel(handler->pending_boot); + handler->pending_boot = boot(handler, opt, cmd, handler->dry_run, + boot_status, handler); + handler->pending_boot_is_default = false; } + +void device_handler_cancel_default(struct device_handler *handler) +{ + struct boot_status status; + + if (handler->timeout_waiter) + waiter_remove(handler->timeout_waiter); + + handler->timeout_waiter = NULL; + handler->autoboot_enabled = false; + + /* we only send status if we had a default boot option queued */ + if (!handler->default_boot_option) + return; + + pb_log("Cancelling default boot option\n"); + + if (handler->pending_boot && handler->pending_boot_is_default) { + boot_cancel(handler->pending_boot); + handler->pending_boot = NULL; + handler->pending_boot_is_default = false; + } + + handler->default_boot_option = NULL; + + status.type = BOOT_STATUS_INFO; + status.progress = -1; + status.detail = NULL; + status.message = _("Default boot cancelled"); + + discover_server_notify_boot_status(handler->server, &status); +} + +void device_handler_update_config(struct device_handler *handler, + struct config *config) +{ + int rc; + + rc = config_set(config); + if (rc) + return; + + discover_server_notify_config(handler->server, config); + device_handler_update_lang(config->lang); + device_handler_reinit(handler); +} + +static char *device_from_addr(void *ctx, struct pb_url *url) +{ + char *ipaddr, *buf, *tok, *dev = NULL; + const char *delim = " "; + struct sockaddr_in *ip; + struct sockaddr_in si; + struct addrinfo *res; + struct process *p; + int rc; + + /* Note: IPv4 only */ + rc = inet_pton(AF_INET, url->host, &(si.sin_addr)); + if (rc > 0) { + ipaddr = url->host; + } else { + /* need to turn hostname into a valid IP */ + rc = getaddrinfo(url->host, NULL, NULL, &res); + if (rc) { + pb_debug("%s: Invalid URL\n",__func__); + return NULL; + } + ipaddr = talloc_array(ctx,char,INET_ADDRSTRLEN); + ip = (struct sockaddr_in *) res->ai_addr; + inet_ntop(AF_INET, &(ip->sin_addr), ipaddr, INET_ADDRSTRLEN); + freeaddrinfo(res); + } + + const char *argv[] = { + pb_system_apps.ip, + "route", "show", "to", "match", + ipaddr, + NULL + }; + + p = process_create(ctx); + + p->path = pb_system_apps.ip; + p->argv = argv; + p->keep_stdout = true; + + rc = process_run_sync(p); + + if (rc) { + /* ip has complained for some reason; most likely + * there is no route to the host - bail out */ + pb_debug("%s: No route to %s\n",__func__,url->host); + return NULL; + } + + buf = p->stdout_buf; + /* If a route is found, ip-route output will be of the form + * "... dev DEVNAME ... " */ + tok = strtok(buf, delim); + while (tok) { + if (!strcmp(tok, "dev")) { + tok = strtok(NULL, delim); + dev = talloc_strdup(ctx, tok); + break; + } + tok = strtok(NULL, delim); + } + + process_release(p); + if (dev) + pb_debug("%s: Found interface '%s'\n", __func__,dev); + return dev; +} + + +void device_handler_process_url(struct device_handler *handler, + const char *url) +{ + struct discover_context *ctx; + struct discover_device *dev; + struct boot_status *status; + struct pb_url *pb_url; + struct event *event; + struct param *param; + + status = talloc(handler, struct boot_status); + + status->type = BOOT_STATUS_ERROR; + status->progress = 0; + status->detail = talloc_asprintf(status, + _("Received config URL %s"), url); + + if (!handler->network) { + status->message = talloc_asprintf(handler, + _("No network configured")); + goto msg; + } + + event = talloc(handler, struct event); + event->type = EVENT_TYPE_USER; + event->action = EVENT_ACTION_CONF; + + event->params = talloc_array(event, struct param, 1); + param = &event->params[0]; + param->name = talloc_strdup(event, "pxeconffile"); + param->value = talloc_strdup(event, url); + event->n_params = 1; + + pb_url = pb_url_parse(event, event->params->value); + if (!pb_url || !pb_url->host) { + status->message = talloc_asprintf(handler, + _("Invalid config URL!")); + goto msg; + } + + event->device = device_from_addr(event, pb_url); + if (!event->device) { + status->message = talloc_asprintf(status, + _("Unable to route to host %s"), + pb_url->host); + goto msg; + } + + dev = discover_device_create(handler, event->device); + ctx = device_handler_discover_context_create(handler, dev); + ctx->event = event; + + iterate_parsers(ctx); + + device_handler_discover_context_commit(handler, ctx); + + talloc_free(ctx); + + status->type = BOOT_STATUS_INFO; + status->message = talloc_asprintf(status, _("Config file %s parsed"), + pb_url->file); +msg: + boot_status(handler, status); + talloc_free(status); +} + +#ifndef PETITBOOT_TEST + +static void device_handler_update_lang(const char *lang) +{ + const char *cur_lang; + + if (!lang) + return; + + cur_lang = setlocale(LC_ALL, NULL); + if (cur_lang && !strcmp(cur_lang, lang)) + return; + + setlocale(LC_ALL, lang); +} + +static int device_handler_init_sources(struct device_handler *handler) +{ + /* init our device sources: udev, network and user events */ + handler->udev = udev_init(handler, handler->waitset); + if (!handler->udev) + return -1; + + handler->network = network_init(handler, handler->waitset, + handler->dry_run); + if (!handler->network) + return -1; + + handler->user_event = user_event_init(handler, handler->waitset); + if (!handler->user_event) + return -1; + + return 0; +} + +static void device_handler_reinit_sources(struct device_handler *handler) +{ + /* if we haven't initialised sources previously (becuase we started in + * safe mode), then init once here. */ + if (!(handler->udev || handler->network || handler->user_event)) { + device_handler_init_sources(handler); + return; + } + + udev_reinit(handler->udev); + + network_shutdown(handler->network); + handler->network = network_init(handler, handler->waitset, + handler->dry_run); +} + +static bool check_existing_mount(struct discover_device *dev) +{ + struct stat devstat, mntstat; + struct mntent *mnt; + FILE *fp; + int rc; + + rc = stat(dev->device_path, &devstat); + if (rc) { + pb_debug("%s: stat failed: %s\n", __func__, strerror(errno)); + return false; + } + + if (!S_ISBLK(devstat.st_mode)) { + pb_debug("%s: %s isn't a block device?\n", __func__, + dev->device_path); + return false; + } + + fp = fopen("/proc/self/mounts", "r"); + + for (;;) { + mnt = getmntent(fp); + if (!mnt) + break; + + if (!mnt->mnt_fsname || mnt->mnt_fsname[0] != '/') + continue; + + rc = stat(mnt->mnt_fsname, &mntstat); + if (rc) + continue; + + if (!S_ISBLK(mntstat.st_mode)) + continue; + + if (mntstat.st_rdev == devstat.st_rdev) { + dev->mount_path = talloc_strdup(dev, mnt->mnt_dir); + dev->mounted_rw = !!hasmntopt(mnt, "rw"); + dev->mounted = true; + dev->unmount = false; + + pb_debug("%s: %s is already mounted (r%c) at %s\n", + __func__, dev->device_path, + dev->mounted_rw ? 'w' : 'o', + mnt->mnt_dir); + break; + } + } + + fclose(fp); + + return mnt != NULL; +} + +static int mount_device(struct discover_device *dev) +{ + const char *fstype; + int rc; + + if (!dev->device_path) + return -1; + + if (dev->mounted) + return 0; + + if (check_existing_mount(dev)) + return 0; + + fstype = discover_device_get_param(dev, "ID_FS_TYPE"); + if (!fstype) + return 0; + + dev->mount_path = join_paths(dev, mount_base(), + dev->device_path); + + if (pb_mkdir_recursive(dev->mount_path)) { + pb_log("couldn't create mount directory %s: %s\n", + dev->mount_path, strerror(errno)); + goto err_free; + } + + pb_log("mounting device %s read-only\n", dev->device_path); + errno = 0; + rc = mount(dev->device_path, dev->mount_path, fstype, + MS_RDONLY | MS_SILENT, ""); + if (!rc) { + dev->mounted = true; + dev->mounted_rw = false; + dev->unmount = true; + return 0; + } + + pb_log("couldn't mount device %s: mount failed: %s\n", + dev->device_path, strerror(errno)); + + pb_rmdir_recursive(mount_base(), dev->mount_path); +err_free: + talloc_free(dev->mount_path); + dev->mount_path = NULL; + return -1; +} + +static int umount_device(struct discover_device *dev) +{ + int rc; + + if (!dev->mounted || !dev->unmount) + return 0; + + pb_log("unmounting device %s\n", dev->device_path); + rc = umount(dev->mount_path); + if (rc) + return -1; + + dev->mounted = false; + + pb_rmdir_recursive(mount_base(), dev->mount_path); + + talloc_free(dev->mount_path); + dev->mount_path = NULL; + + return 0; +} + +int device_request_write(struct discover_device *dev, bool *release) +{ + int rc; + + *release = false; + + if (!dev->mounted) + return -1; + + if (dev->mounted_rw) + return 0; + + pb_log("remounting device %s read-write\n", dev->device_path); + rc = mount(dev->device_path, dev->mount_path, "", + MS_REMOUNT | MS_SILENT, ""); + if (rc) + return -1; + + dev->mounted_rw = true; + *release = true; + return 0; +} + +void device_release_write(struct discover_device *dev, bool release) +{ + if (!release) + return; + + pb_log("remounting device %s read-only\n", dev->device_path); + mount(dev->device_path, dev->mount_path, "", + MS_REMOUNT | MS_RDONLY | MS_SILENT, ""); + dev->mounted_rw = false; +} + +#else + +static void device_handler_update_lang(const char *lang __attribute__((unused))) +{ +} + +static int device_handler_init_sources( + struct device_handler *handler __attribute__((unused))) +{ + return 0; +} + +static void device_handler_reinit_sources( + struct device_handler *handler __attribute__((unused))) +{ +} + +static int umount_device(struct discover_device *dev __attribute__((unused))) +{ + return 0; +} + +static int __attribute__((unused)) mount_device( + struct discover_device *dev __attribute__((unused))) +{ + return 0; +} + +int device_request_write(struct discover_device *dev __attribute__((unused)), + bool *release) +{ + *release = true; + return 0; +} + +void device_release_write(struct discover_device *dev __attribute__((unused)), + bool release __attribute__((unused))) +{ +} + +#endif +