X-Git-Url: http://git.ozlabs.org/?p=petitboot;a=blobdiff_plain;f=discover%2Fuser-event.c;h=1257796494e5211f01d210a11565c9539a6bffca;hp=275d9e24244a430b46201e0a55c7cce86877aa1e;hb=c78f9ec47ba92b74698dacdae963dbbefd9b676f;hpb=f611bde3f182e9a4befb48a0160d1831708aca67

diff --git a/discover/user-event.c b/discover/user-event.c
index 275d9e2..1257796 100644
--- a/discover/user-event.c
+++ b/discover/user-event.c
@@ -20,7 +20,6 @@
 #include "config.h"
 #endif
 
-#define _GNU_SOURCE
 #include <assert.h>
 #include <errno.h>
 #include <string.h>
@@ -38,8 +37,12 @@
 #include "resource.h"
 #include "event.h"
 #include "user-event.h"
+#include "sysinfo.h"
 
 
+#define MAC_ADDR_SIZE	6
+#define IP_ADDR_SIZE	4
+
 struct user_event {
 	struct device_handler *handler;
 	int socket;
@@ -52,8 +55,16 @@ static const char *event_action_name(enum event_action action)
 		return "add";
 	case EVENT_ACTION_REMOVE:
 		return "remove";
-	case EVENT_ACTION_CONF:
-		return "conf";
+	case EVENT_ACTION_URL:
+		return "url";
+	case EVENT_ACTION_DHCP:
+		return "dhcp";
+	case EVENT_ACTION_BOOT:
+		return "boot";
+	case EVENT_ACTION_SYNC:
+		return "sync";
+	case EVENT_ACTION_PLUGIN:
+		return "plugin";
 	default:
 		break;
 	}
@@ -65,35 +76,47 @@ static void user_event_print_event(struct event __attribute__((unused)) *event)
 {
 	int i;
 
-	pb_log("user_event %s event:\n", event_action_name(event->action));
-	pb_log("\tdevice: %s\n", event->device);
+	pb_debug("user_event %s event:\n", event_action_name(event->action));
+	pb_debug("\tdevice: %s\n", event->device);
 
 	for (i = 0; i < event->n_params; i++)
-		pb_log("\t%-12s => %s\n",
+		pb_debug("\t%-12s => %s\n",
 			event->params[i].name, event->params[i].value);
 }
 
-static enum conf_method parse_conf_method(const char *str)
-{
-
-	if (!strcasecmp(str, "dhcp")) {
-		return CONF_METHOD_DHCP;
-	}
-	return CONF_METHOD_UNKNOWN;
-}
-
 static struct resource *user_event_resource(struct discover_boot_option *opt,
-		struct event *event, const char *param_name)
+		struct event *event, bool gen_boot_args_sigfile)
 {
+	const char *siaddr, *boot_file;
 	struct resource *res;
 	struct pb_url *url;
-	const char *val;
+	char *url_str;
+
+	siaddr = event_get_param(event, "siaddr");
+	if (!siaddr) {
+		pb_log_fn("next server option not found\n");
+		return NULL;
+	}
 
-	val = event_get_param(event, param_name);
-	if (!val)
+	boot_file = event_get_param(event, "bootfile");
+	if (!boot_file) {
+		pb_log_fn("bootfile not found\n");
 		return NULL;
+	}
+
+	if (gen_boot_args_sigfile) {
+		char* args_sigfile_default = talloc_asprintf(opt,
+			"%s.cmdline.sig", boot_file);
+		url_str = talloc_asprintf(opt, "%s%s/%s", "tftp://", siaddr,
+			args_sigfile_default);
+		talloc_free(args_sigfile_default);
+	}
+	else
+		url_str = talloc_asprintf(opt, "%s%s/%s", "tftp://", siaddr,
+			boot_file);
+	url = pb_url_parse(opt, url_str);
+	talloc_free(url_str);
 
-	url = pb_url_parse(opt, val);
 	if (!url)
 		return NULL;
 
@@ -109,41 +132,56 @@ static struct resource *user_event_resource(struct discover_boot_option *opt,
 static int parse_user_event(struct discover_context *ctx, struct event *event)
 {
 	struct discover_boot_option *d_opt;
+	char *server_ip, *root_dir, *p;
 	struct boot_option *opt;
 	struct device *dev;
-	const char *p;
+	const char *val;
 
 	dev = ctx->device->device;
 
 	d_opt = discover_boot_option_create(ctx, ctx->device);
-	opt = d_opt->option;
-
 	if (!d_opt)
 		goto fail;
 
-	p = event_get_param(event, "name");
+	opt = d_opt->option;
 
-	if (!p) {
-		pb_log("%s: no name found\n", __func__);
-		goto fail;
+	val = event_get_param(event, "name");
+
+	if (!val) {
+		pb_log_fn("no name found\n");
+		goto fail_opt;
 	}
 
-	opt->id = talloc_asprintf(opt, "%s#%s", dev->id, p);
-	opt->name = talloc_strdup(opt, p);
+	opt->id = talloc_asprintf(opt, "%s#%s", dev->id, val);
+	opt->name = talloc_strdup(opt, val);
 
-	d_opt->boot_image = user_event_resource(d_opt, event, "image");
+	d_opt->boot_image = user_event_resource(d_opt, event, false);
 	if (!d_opt->boot_image) {
-		pb_log("%s: no boot image found for %s!\n", __func__,
+		pb_log_fn("no boot image found for %s!\n",
 				opt->name);
-		goto fail;
+		goto fail_opt;
+	}
+	d_opt->args_sig_file = user_event_resource(d_opt, event, true);
+
+	val = event_get_param(event, "rootpath");
+	if (val) {
+		server_ip = talloc_strdup(opt, val);
+		p = strchr(server_ip, ':');
+		if (p) {
+			root_dir = talloc_strdup(opt, p + 1);
+			*p = '\0';
+			opt->boot_args = talloc_asprintf(opt, "%s%s:%s",
+					"root=/dev/nfs ip=any nfsroot=",
+					server_ip, root_dir);
+
+			talloc_free(root_dir);
+		} else {
+			opt->boot_args = talloc_asprintf(opt, "%s",
+					"root=/dev/nfs ip=any nfsroot=");
+		}
+
+		talloc_free(server_ip);
 	}
-
-	d_opt->initrd = user_event_resource(d_opt, event, "initrd");
-
-	p = event_get_param(event, "args");
-
-	if (p)
-		opt->boot_args = talloc_strdup(opt, p);
 
 	opt->description = talloc_asprintf(opt, "%s %s", opt->boot_image_file,
 		opt->boot_args ? : "");
@@ -155,38 +193,231 @@ static int parse_user_event(struct discover_context *ctx, struct event *event)
 
 	return 0;
 
-fail:
+fail_opt:
 	talloc_free(d_opt);
+fail:
 	return -1;
 }
 
-static int user_event_conf(struct user_event *uev, struct event *event)
+static const char *parse_host_addr(struct event *event)
+{
+	const char *val;
+
+	val = event_get_param(event, "tftp");
+	if (val)
+		return val;
+
+	val = event_get_param(event, "siaddr");
+	if (val)
+		return val;
+
+	val = event_get_param(event, "serverid");
+	if (val)
+		return val;
+
+	return NULL;
+}
+
+static char *parse_mac_addr(struct discover_context *ctx, const char *mac)
+{
+	unsigned int mac_addr_arr[MAC_ADDR_SIZE];
+	char *mac_addr;
+
+	sscanf(mac, "%X:%X:%X:%X:%X:%X", mac_addr_arr, mac_addr_arr + 1,
+			mac_addr_arr + 2, mac_addr_arr + 3, mac_addr_arr + 4,
+			mac_addr_arr + 5);
+
+	mac_addr = talloc_asprintf(ctx, "01-%02x-%02x-%02x-%02x-%02x-%02x",
+			mac_addr_arr[0], mac_addr_arr[1], mac_addr_arr[2],
+			mac_addr_arr[3], mac_addr_arr[4], mac_addr_arr[5]);
+
+	return mac_addr;
+}
+
+static char *parse_ip_addr(struct discover_context *ctx, const char *ip)
+{
+	unsigned int ip_addr_arr[IP_ADDR_SIZE];
+	char *ip_hex;
+
+	sscanf(ip, "%u.%u.%u.%u", ip_addr_arr, ip_addr_arr + 1,
+			ip_addr_arr + 2, ip_addr_arr + 3);
+
+	ip_hex = talloc_asprintf(ctx, "%02X%02X%02X%02X", ip_addr_arr[0],
+			ip_addr_arr[1], ip_addr_arr[2], ip_addr_arr[3]);
+
+	return ip_hex;
+}
+
+struct pb_url *user_event_parse_conf_url(struct discover_context *ctx,
+		struct event *event, bool *is_complete)
+{
+	const char *conffile, *pathprefix, *host, *bootfile, *bootfile_url;
+	char *p, *basedir, *url_str;
+	struct pb_url *url;
+
+	conffile = event_get_param(event, "pxeconffile");
+	pathprefix = event_get_param(event, "pxepathprefix");
+	bootfile = event_get_param(event, "bootfile");
+	bootfile_url = event_get_param(event, "bootfile_url");
+
+	/* If we're given a conf file, we're able to generate a complete URL to
+	 * the configuration file, and the parser doesn't need to do any
+	 * further autodiscovery */
+	*is_complete = !!conffile;
+
+	/* if conffile is a URL, that's all we need */
+	if (conffile && is_url(conffile)) {
+		url = pb_url_parse(ctx, conffile);
+		return url;
+	}
+
+	/* If we can create a URL from pathprefix (optionally with
+	 * conffile appended to create a complete URL), use that */
+	if (pathprefix && is_url(pathprefix)) {
+		if (conffile) {
+			url_str = talloc_asprintf(ctx, "%s%s",
+					pathprefix, conffile);
+			url = pb_url_parse(ctx, url_str);
+			talloc_free(url_str);
+		} else {
+			url = pb_url_parse(ctx, pathprefix);
+		}
+
+		return url;
+	}
+
+	host = parse_host_addr(event);
+	if (!host) {
+		pb_log_fn("host address not found\n");
+
+		/* No full URLs and no host address? Check for DHCPv6 options */
+		if (bootfile_url && is_url(bootfile_url)) {
+			*is_complete = true;
+			return pb_url_parse(ctx, bootfile_url);
+		}
+		return NULL;
+	}
+
+	url_str = talloc_asprintf(ctx, "tftp://%s/", host);
+
+	/* if we have a pathprefix, use that directly.. */
+	if (pathprefix) {
+		/* strip leading slashes */
+		while (pathprefix[0] == '/')
+			pathprefix++;
+		url_str = talloc_asprintf_append(url_str, "%s", pathprefix);
+
+	/* ... otherwise, add a path based on the bootfile name, but only
+	 * if conffile isn't an absolute path itself */
+	} else if (bootfile && !(conffile && conffile[0] == '/')) {
+
+		basedir = talloc_strdup(ctx, bootfile);
+
+		/* strip filename from the bootfile path, leaving only a
+		 * directory */
+		p = strrchr(basedir, '/');
+		if (!p)
+			p = basedir;
+		*p = '\0';
+
+		if (strlen(basedir))
+			url_str = talloc_asprintf_append(url_str, "%s/",
+					basedir);
+
+		talloc_free(basedir);
+	}
+
+	/* finally, append conffile */
+	if (conffile)
+		url_str = talloc_asprintf_append(url_str, "%s", conffile);
+
+	url = pb_url_parse(ctx, url_str);
+
+	talloc_free(url_str);
+
+	return url;
+}
+
+char **user_event_parse_conf_filenames(
+		struct discover_context *ctx, struct event *event)
+{
+	char *mac_addr, *ip_hex;
+	const char *mac, *ip;
+	char **filenames;
+	int index, len;
+
+	mac = event_get_param(event, "mac");
+	if (mac)
+		mac_addr = parse_mac_addr(ctx, mac);
+	else
+		mac_addr = NULL;
+
+	ip = event_get_param(event, "ip");
+	if (ip) {
+		ip_hex = parse_ip_addr(ctx, ip);
+		len = strlen(ip_hex);
+	} else {
+		ip_hex = NULL;
+		len = 0;
+	}
+
+	if (!mac_addr && !ip_hex) {
+		pb_log_fn("neither mac nor ip parameter found\n");
+		return NULL;
+	}
+
+	/* Filenames as fallback IP's + mac + default */
+	filenames = talloc_array(ctx, char *, len + 3);
+
+	index = 0;
+	if (mac_addr)
+		filenames[index++] = talloc_strdup(filenames, mac_addr);
+
+	while (len) {
+		filenames[index++] = talloc_strdup(filenames, ip_hex);
+		ip_hex[--len] = '\0';
+	}
+
+	filenames[index++] = talloc_strdup(filenames, "default");
+	filenames[index++] = NULL;
+
+	if (mac_addr)
+		talloc_free(mac_addr);
+
+	if (ip_hex)
+		talloc_free(ip_hex);
+
+	return filenames;
+}
+
+static int user_event_dhcp(struct user_event *uev, struct event *event)
 {
 	struct device_handler *handler = uev->handler;
 	struct discover_device *dev;
-	enum conf_method method;
-	struct pb_url *url;
-	const char *val;
 
-	val = event_get_param(event, "url");
-	if (!val)
-		return 0;
+	uint8_t hwaddr[MAC_ADDR_SIZE];
 
-	url = pb_url_parse(event, val);
-	if (!url)
-		return 0;
+	if (!event_get_param(event, "mac"))
+		return -1;
+	if (!event_get_param(event, "ip") && !event_get_param(event, "ipv6"))
+		return -1;
 
-	val = event_get_param(event, "method");
-	if (!val)
-		return 0;
+	sscanf(event_get_param(event, "mac"),
+	       "%hhX:%hhX:%hhX:%hhX:%hhX:%hhX",
+	       hwaddr, hwaddr + 1, hwaddr + 2,
+	       hwaddr + 3, hwaddr + 4, hwaddr + 5);
 
-	method = parse_conf_method(val);
-	if (method == CONF_METHOD_UNKNOWN)
-		return 0;
+	if (event_get_param(event, "ipv6"))
+		system_info_set_interface_address(sizeof(hwaddr), hwaddr,
+						  event_get_param(event, "ipv6"));
+	else
+		system_info_set_interface_address(sizeof(hwaddr), hwaddr,
+						  event_get_param(event, "ip"));
 
-	dev = discover_device_create(handler, event->device);
+	dev = discover_device_create(handler, event_get_param(event, "mac"),
+					event->device);
 
-	device_handler_conf(handler, dev, url, method);
+	device_handler_dhcp(handler, dev, event);
 
 	return 0;
 }
@@ -196,11 +427,19 @@ static int user_event_add(struct user_event *uev, struct event *event)
 	struct device_handler *handler = uev->handler;
 	struct discover_context *ctx;
 	struct discover_device *dev;
+	int rc;
 
-	dev = discover_device_create(handler, event->device);
+	/* In case this is a network interface, try to refer to it by UUID */
+	dev = discover_device_create(handler, event_get_param(event, "mac"),
+					event->device);
+	dev->device->id = talloc_strdup(dev, event->device);
 	ctx = device_handler_discover_context_create(handler, dev);
 
-	parse_user_event(ctx, event);
+	rc = parse_user_event(ctx, event);
+	if (rc) {
+		pb_log("parse_user_event returned %d\n", rc);
+		return rc;
+	}
 
 	device_handler_discover_context_commit(handler, ctx);
 
@@ -213,8 +452,13 @@ static int user_event_remove(struct user_event *uev, struct event *event)
 {
 	struct device_handler *handler = uev->handler;
 	struct discover_device *dev;
+	const char *mac = event_get_param(event, "mac");
+
+	if (mac)
+		dev = device_lookup_by_uuid(handler, event_get_param(event, "mac"));
+	else
+		dev = device_lookup_by_id(handler, event->device);
 
-	dev = device_lookup_by_id(handler, event->device);
 	if (!dev)
 		return 0;
 
@@ -223,6 +467,153 @@ static int user_event_remove(struct user_event *uev, struct event *event)
 	return 0;
 }
 
+static int user_event_url(struct user_event *uev, struct event *event)
+{
+	struct device_handler *handler = uev->handler;
+	const char *url;
+
+	url = event_get_param(event, "url");
+	if (url)
+		device_handler_process_url(handler, url, NULL, NULL);
+
+	return 0;
+}
+
+static int user_event_boot(struct user_event *uev, struct event *event)
+{
+	struct device_handler *handler = uev->handler;
+	struct boot_command *cmd = talloc(handler, struct boot_command);
+
+	cmd->option_id = talloc_strdup(cmd, event_get_param(event, "id"));
+	cmd->boot_image_file = talloc_strdup(cmd, event_get_param(event, "image"));
+	cmd->initrd_file = talloc_strdup(cmd, event_get_param(event, "initrd"));
+	cmd->dtb_file = talloc_strdup(cmd, event_get_param(event, "dtb"));
+	cmd->boot_args = talloc_strdup(cmd, event_get_param(event, "args"));
+
+	device_handler_boot(handler, cmd);
+
+	talloc_free(cmd);
+
+	return 0;
+}
+
+static int user_event_sync(struct user_event *uev, struct event *event)
+{
+	struct device_handler *handler = uev->handler;
+
+	if (strncasecmp(event->device, "all", strlen("all")) != 0)
+		device_sync_snapshots(handler, event->device);
+	else
+		device_sync_snapshots(handler, NULL);
+
+	return 0;
+}
+
+static int process_uninstalled_plugin(struct user_event *uev,
+		struct event *event)
+{
+	struct device_handler *handler = uev->handler;
+	struct discover_boot_option *file_opt;
+	struct discover_device *device;
+	struct discover_context *ctx;
+	const char *path;
+	struct resource *res;
+
+	if (!event_get_param(event, "path")) {
+		pb_log("Uninstalled pb-plugin event missing path param\n");
+		return -1;
+	}
+
+	device = device_lookup_by_name(handler, event->device);
+	if (!device) {
+		pb_log("Couldn't find device matching %s for plugin\n",
+				event->device);
+		return -1;
+	}
+
+	ctx = device_handler_discover_context_create(handler, device);
+	file_opt = discover_boot_option_create(ctx, device);
+	file_opt->option->name = talloc_strdup(file_opt,
+			event_get_param(event, "name"));
+	file_opt->option->id = talloc_asprintf(file_opt, "%s@%p",
+			device->device->id, file_opt);
+	file_opt->option->type = DISCOVER_PLUGIN_OPTION;
+
+
+	path = event_get_param(event, "path");
+	/* path may be relative to root */
+	if (strncmp(device->mount_path, path, strlen(device->mount_path)) == 0) {
+		path += strlen(device->mount_path) + 1;
+	}
+
+	res = talloc(file_opt, struct resource);
+	resolve_resource_against_device(res, device, path);
+	file_opt->boot_image = res;
+
+	discover_context_add_boot_option(ctx, file_opt);
+	device_handler_discover_context_commit(handler, ctx);
+
+	return 0;
+}
+
+/*
+ * Notification of a plugin event. This can either be for an uninstalled plugin
+ * that pb-plugin has scanned, or the result of a plugin that pb-plugin has
+ * installed.
+ */
+static int user_event_plugin(struct user_event *uev, struct event *event)
+{
+	struct device_handler *handler = uev->handler;
+	char *executable, *executables, *saveptr;
+	struct plugin_option *opt;
+	const char *installed;
+
+	installed = event_get_param(event, "installed");
+	if (!installed || strncmp(installed, "no", strlen("no")) == 0)
+		return process_uninstalled_plugin(uev, event);
+
+	opt = talloc_zero(handler, struct plugin_option);
+	if (!opt)
+		return -1;
+	opt->name = talloc_strdup(opt, event_get_param(event, "name"));
+	opt->id = talloc_strdup(opt, event_get_param(event, "id"));
+	opt->version = talloc_strdup(opt, event_get_param(event, "version"));
+	opt->vendor = talloc_strdup(opt, event_get_param(event, "vendor"));
+	opt->vendor_id = talloc_strdup(opt, event_get_param(event, "vendor_id"));
+	opt->date = talloc_strdup(opt, event_get_param(event, "date"));
+	opt->plugin_file = talloc_strdup(opt,
+			event_get_param(event, "source_file"));
+
+	executables = talloc_strdup(opt, event_get_param(event, "executables"));
+	if (!executables) {
+		talloc_free(opt);
+		return -1;
+	}
+
+	/*
+	 * The 'executables' parameter is a space-delimited list of installed
+	 * executables
+	 */
+	executable = strtok_r(executables, " ", &saveptr);
+	while (executable) {
+		opt->executables = talloc_realloc(opt, opt->executables,
+						  char *, opt->n_executables + 1);
+		if (!opt->executables) {
+			talloc_free(opt);
+			return -1;
+		}
+		opt->executables[opt->n_executables++] = talloc_strdup(opt,
+								executable);
+		executable = strtok_r(NULL, " ", &saveptr);
+	}
+
+	device_handler_add_plugin_option(handler, opt);
+
+	talloc_free(executables);
+
+	return 0;
+}
+
 static void user_event_handle_message(struct user_event *uev, char *buf,
 	int len)
 {
@@ -246,37 +637,53 @@ static void user_event_handle_message(struct user_event *uev, char *buf,
 	case EVENT_ACTION_REMOVE:
 		result = user_event_remove(uev, event);
 		break;
-	case EVENT_ACTION_CONF:
-		result = user_event_conf(uev, event);
+	case EVENT_ACTION_URL:
+		result = user_event_url(uev, event);
+		goto out;
+	case EVENT_ACTION_DHCP:
+		result = user_event_dhcp(uev, event);
+		goto out;
+	case EVENT_ACTION_BOOT:
+		result = user_event_boot(uev, event);
+		break;
+	case EVENT_ACTION_SYNC:
+		result = user_event_sync(uev, event);
+		break;
+	case EVENT_ACTION_PLUGIN:
+		result = user_event_plugin(uev, event);
 		break;
 	default:
 		break;
 	}
 
+	/* user_event_url() and user_event_dhcp() will steal the event context,
+	 * but all others still need to free */
 	talloc_free(event);
-
+out:
 	return;
 }
 
 static int user_event_process(void *arg)
 {
 	struct user_event *uev = arg;
-	char buf[PBOOT_USER_EVENT_SIZE];
+	char buf[PBOOT_USER_EVENT_SIZE + 1];
 	int len;
 
-	len = recvfrom(uev->socket, buf, sizeof(buf), 0, NULL, NULL);
+	len = recvfrom(uev->socket, buf, PBOOT_USER_EVENT_SIZE, 0, NULL, NULL);
 
 	if (len < 0) {
-		pb_log("%s: socket read failed: %s", __func__, strerror(errno));
+		pb_log_fn("socket read failed: %s\n", strerror(errno));
 		return 0;
 	}
 
 	if (len == 0) {
-		pb_log("%s: empty", __func__);
+		pb_log_fn("empty\n");
 		return 0;
 	}
 
-	pb_log("%s: %u bytes\n", __func__, len);
+	buf[len] = '\0';
+
+	pb_debug("%s: %u bytes\n", __func__, len);
 
 	user_event_handle_message(uev, buf, len);
 
@@ -287,7 +694,7 @@ static int user_event_destructor(void *arg)
 {
 	struct user_event *uev = arg;
 
-	pb_log("%s\n", __func__);
+	pb_debug("%s\n", __func__);
 
 	if (uev->socket >= 0)
 		close(uev->socket);
@@ -295,15 +702,15 @@ static int user_event_destructor(void *arg)
 	return 0;
 }
 
-struct user_event *user_event_init(struct waitset *waitset,
-		struct device_handler *handler)
+struct user_event *user_event_init(struct device_handler *handler,
+		struct waitset *waitset)
 {
 	struct sockaddr_un addr;
 	struct user_event *uev;
 
 	unlink(PBOOT_USER_EVENT_SOCKET);
 
-	uev = talloc(NULL, struct user_event);
+	uev = talloc(handler, struct user_event);
 
 	uev->handler = handler;
 
@@ -328,7 +735,7 @@ struct user_event *user_event_init(struct waitset *waitset,
 	waiter_register_io(waitset, uev->socket, WAIT_IN,
 			user_event_process, uev);
 
-	pb_log("%s: waiting on %s\n", __func__, PBOOT_USER_EVENT_SOCKET);
+	pb_debug("%s: waiting on %s\n", __func__, PBOOT_USER_EVENT_SOCKET);
 
 	return uev;
 
@@ -336,8 +743,3 @@ out_err:
 	talloc_free(uev);
 	return NULL;
 }
-
-void user_event_destroy(struct user_event *uev)
-{
-	talloc_free(uev);
-}