X-Git-Url: http://git.ozlabs.org/?p=petitboot;a=blobdiff_plain;f=discover%2Fudev.c;h=3127ec25edc68dbc1cf484b973f76905c3ae0ebc;hp=9c1b399cd7857a9d59c6bb1b4884a26bbd315c8a;hb=fb03a29fab5130041ed8f607f811dadeb797e5c9;hpb=32e6a41f33e5576716b351bd473a27939fe94fa1

diff --git a/discover/udev.c b/discover/udev.c
index 9c1b399..3127ec2 100644
--- a/discover/udev.c
+++ b/discover/udev.c
@@ -1,208 +1,419 @@
 
-#define _GNU_SOURCE
+#if defined(HAVE_CONFIG_H)
+#include "config.h"
+#endif
 
-#include <stdlib.h>
+#include <assert.h>
+#include <errno.h>
+#include <libudev.h>
 #include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
 #include <unistd.h>
-#include <errno.h>
-#include <sys/types.h>
 #include <sys/socket.h>
+#include <sys/types.h>
 #include <sys/un.h>
 
+#include <log/log.h>
+#include <types/types.h>
 #include <talloc/talloc.h>
+#include <waiter/waiter.h>
+#include <system/system.h>
 
+#include "event.h"
 #include "udev.h"
-#include "log.h"
-#include "waiter.h"
 #include "pb-discover.h"
+#include "device-handler.h"
+#include "cdrom.h"
 
-#define PBOOT_DEVICE_SOCKET "/tmp/petitboot.udev"
-
-#define max(a, b) ((a) > (b) ? (a) : (b))
-
-struct udev {
-	int socket;
+struct pb_udev {
+	struct udev *udev;
+	struct udev_monitor *monitor;
+	struct device_handler *handler;
 };
 
-static void parse_event_params(struct udev_event *event, char *buf, int len)
+static int udev_destructor(void *p)
 {
-	int param_len, name_len, value_len;
-	struct param *param;
-	char *sep;
-
-	for (; len > 0; len -= param_len + 1, buf += param_len + 1) {
-
-		/* find the length of the whole parameter */
-		param_len = strnlen(buf, len);
-		if (!param_len) {
-			/* multiple NULs? skip over */
-			param_len = 1;
-			continue;
-		}
+	struct pb_udev *udev = p;
 
-		/* find the separator */
-		sep = memchr(buf, '=', param_len);
-		if (!sep)
-			continue;
+	udev_monitor_unref(udev->monitor);
+	udev->monitor = NULL;
 
-		name_len = sep - buf;
-		value_len = param_len - name_len - 1;
+	udev_unref(udev->udev);
+	udev->udev = NULL;
 
-		/* update the params array */
-		event->params = talloc_realloc(event, event->params,
-					struct param, ++event->n_params);
-		param = &event->params[event->n_params - 1];
+	return 0;
+}
 
-		param->name = talloc_strndup(event, buf, name_len);
-		param->value = talloc_strndup(event, sep + 1, value_len);
-	}
+static void udev_setup_device_params(struct udev_device *udev,
+		struct discover_device *dev)
+{
+	struct udev_list_entry *list, *entry;
+
+	list = udev_device_get_properties_list_entry(udev);
+	if (!list)
+		return;
+
+	udev_list_entry_foreach(entry, list)
+		discover_device_set_param(dev,
+				udev_list_entry_get_name(entry),
+				udev_list_entry_get_value(entry));
 }
 
-static const char *event_param(struct udev_event *event, const char *name)
+static int udev_handle_dev_add(struct pb_udev *udev, struct udev_device *dev)
 {
-	int i;
+	struct discover_device *ddev;
+	const char *typestr;
+	const char *uuid;
+	const char *path;
+	const char *name;
+	const char *node;
+	const char *prop;
+	bool cdrom;
+
+	name = udev_device_get_sysname(dev);
+	if (!name) {
+		pb_debug("udev_device_get_sysname failed\n");
+		return -1;
+	}
 
-	for (i = 0; i < event->n_params; i++)
-		if (!strcasecmp(event->params[i].name, name))
-			return event->params[i].value;
+	typestr = udev_device_get_devtype(dev);
+	if (!typestr) {
+		pb_debug("udev_device_get_devtype failed\n");
+		return -1;
+	}
 
-	return NULL;
+	if (!(!strcmp(typestr, "disk") || !strcmp(typestr, "partition"))) {
+		pb_debug("SKIP %s: invalid type %s\n", name, typestr);
+		return 0;
+	}
+
+	node = udev_device_get_devnode(dev);
+	path = udev_device_get_devpath(dev);
+	if (path && (strstr(path, "virtual/block/loop")
+			|| strstr(path, "virtual/block/ram"))) {
+		pb_debug("SKIP: %s: ignored (path=%s)\n", name, path);
+		return 0;
+	}
+
+	cdrom = node && !!udev_device_get_property_value(dev, "ID_CDROM");
+	if (cdrom) {
+		/* CDROMs require a little initialisation, to get
+		 * petitboot-compatible tray behaviour */
+		cdrom_init(node);
+		if (!cdrom_media_present(node)) {
+			pb_debug("SKIP: %s: no media present\n", name);
+			return 0;
+		}
+	}
+
+	/* We have enough info to create the device and start discovery */
+	ddev = device_lookup_by_id(udev->handler, name);
+	if (ddev) {
+		pb_debug("device %s is already present?\n", name);
+		return -1;
+	}
+
+	/* We may see multipath devices; they'll have the same uuid as an
+	 * existing device, so only parse the first. */
+	uuid = udev_device_get_property_value(dev, "ID_FS_UUID");
+	if (uuid) {
+		ddev = device_lookup_by_uuid(udev->handler, uuid);
+		if (ddev) {
+			pb_log("SKIP: %s UUID [%s] already present (as %s)\n",
+					name, uuid, ddev->device->id);
+			return -1;
+		}
+	}
+
+	ddev = discover_device_create(udev->handler, name);
+
+	ddev->device_path = talloc_strdup(ddev, node);
+
+	if (uuid)
+		ddev->uuid = talloc_strdup(ddev, uuid);
+	prop = udev_device_get_property_value(dev, "ID_FS_LABEL");
+	if (prop)
+		ddev->label = talloc_strdup(ddev, prop);
+	ddev->device->type = cdrom ? DEVICE_TYPE_OPTICAL : DEVICE_TYPE_DISK;
+
+	udev_setup_device_params(dev, ddev);
+
+	device_handler_discover(udev->handler, ddev);
+
+	return 0;
 }
 
-static void print_event(struct udev_event *event)
+static int udev_handle_dev_remove(struct pb_udev *udev, struct udev_device *dev)
 {
-	const char *action, *params[] = {
-		"DEVNAME", "ID_TYPE", "ID_BUS", "ID_FS_UUID", "ID_FS_LABEL",
-		NULL,
-	};
-	int i;
+	struct discover_device *ddev;
+	const char *name;
 
-	action = event->action == UDEV_ACTION_ADD ? "add" : "remove";
+	name = udev_device_get_sysname(dev);
+	if (!name) {
+		pb_debug("udev_device_get_sysname failed\n");
+		return -1;
+	}
 
-	pb_log("udev %s event:\n", action);
-	printf("\tdevice: %s\n", event->device);
+	ddev = device_lookup_by_id(udev->handler, name);
+	if (!ddev)
+		return 0;
 
-	for (i = 0; params[i]; i++)
-		printf("\t%-12s => %s\n",
-				params[i], event_param(event, params[i]));
+	device_handler_remove(udev->handler, ddev);
 
+	return 0;
 }
 
-static void handle_udev_message(struct udev *udev, char *buf, int len)
+static int udev_handle_dev_change(struct pb_udev *udev, struct udev_device *dev)
 {
-	char *sep, *device;
-	enum udev_action action;
-	struct udev_event *event;
-	int device_len;
-
-	/* we should see an <action>@<device>\0 at the head of the buffer */
-	sep = strchr(buf, '@');
-	if (!sep)
-		return;
+	struct discover_device *ddev;
+	const char *name, *node;
 
-	/* terminate the action string */
-	*sep = '\0';
-	len -= sep - buf + 1;
+	name = udev_device_get_sysname(dev);
+	node = udev_device_get_devnode(dev);
 
-	if (!strcmp(buf, "add")) {
-		action = UDEV_ACTION_ADD;
+	/* we're only interested in CDROM change events at present */
+	if (!udev_device_get_property_value(dev, "ID_CDROM"))
+		return 0;
 
-	} else if (!strcmp(buf, "remove")) {
-		action = UDEV_ACTION_REMOVE;
+	/* handle CDROM eject requests */
+	if (udev_device_get_property_value(dev, "DISK_EJECT_REQUEST")) {
+		bool eject = false;
 
-	} else {
-		return;
+		pb_debug("udev: eject request\n");
+
+		/* If the device is mounted, cdrom_id's own eject request may
+		 * have failed. So, we'll need to do our own here.
+		 */
+		ddev = device_lookup_by_id(udev->handler, name);
+		if (ddev) {
+			eject = ddev->mounted;
+			udev_handle_dev_remove(udev, dev);
+		}
+
+		if (eject)
+			cdrom_eject(node);
+
+		return 0;
 	}
 
-	/* initialise the device string */
-	device = sep + 1;
-	device_len = strnlen(device, len);
-	if (!device_len)
-		return;
+	if (udev_device_get_property_value(dev, "DISK_MEDIA_CHANGE")) {
+		if (cdrom_media_present(node))
+			return udev_handle_dev_add(udev, dev);
+		else
+			return udev_handle_dev_remove(udev, dev);
+	}
 
-	/* now we have an action and a device, we can construct an event */
-	event = talloc(udev, struct udev_event);
-	event->action = action;
-	event->device = talloc_strndup(event, device, device_len);
-	event->n_params = 0;
-	event->params = NULL;
+	return 0;
+}
 
-	len -= device_len + 1;
-	parse_event_params(event, device + device_len + 1, len);
+static int udev_handle_dev_action(struct udev_device *dev, const char *action)
+{
+	struct pb_udev *udev = udev_get_userdata(udev_device_get_udev(dev));
+
+#ifdef DEBUG
+	{
+		struct udev_list_entry *list;
+		const char *name;
+
+		list = udev_device_get_properties_list_entry(dev);
+		name = udev_device_get_sysname(dev);
+
+		pb_debug("%s: action %s, device %s\n", __func__, action, name);
+		pb_debug("%s properties:\n", __func__);
 
-	print_event(event);
+		for (; list; list = udev_list_entry_get_next(list))
+			pb_log("\t%-20s: %s\n", udev_list_entry_get_name(list),
+					udev_list_entry_get_value(list));
+	} while (0);
+#endif
 
-	talloc_free(event);
+	if (!strcmp(action, "add"))
+		return udev_handle_dev_add(udev, dev);
 
-	return;
+	else if (!strcmp(action, "remove"))
+		return udev_handle_dev_remove(udev, dev);
+
+	else if (!strcmp(action, "change"))
+		return udev_handle_dev_change(udev, dev);
+
+	return 0;
 }
 
-static int udev_process(void *arg)
+static int udev_enumerate(struct udev *udev)
 {
-	struct udev *udev = arg;
-	char buf[4096];
-	int len;
+	int result;
+	struct udev_list_entry *list, *entry;
+	struct udev_enumerate *enumerate;
 
-	len = recvfrom(udev->socket, buf, sizeof(buf), 0, NULL, NULL);
+	enumerate = udev_enumerate_new(udev);
 
-	if (len < 0) {
-		pb_log("udev socket read failed: %s", strerror(errno));
+	if (!enumerate) {
+		pb_log("udev_enumerate_new failed\n");
 		return -1;
 	}
 
-	if (len == 0)
-		return 0;
+	result = udev_enumerate_add_match_subsystem(enumerate, "block");
+
+	if (result) {
+		pb_log("udev_enumerate_add_match_subsystem failed\n");
+		goto fail;
+	}
+
+	udev_enumerate_scan_devices(enumerate);
+
+	list = udev_enumerate_get_list_entry(enumerate);
+
+	if (!list) {
+		pb_log("udev_enumerate_get_list_entry failed\n");
+		goto fail;
+	}
 
-	handle_udev_message(udev, buf, len);
+	udev_list_entry_foreach(entry, list) {
+		const char *syspath;
+		struct udev_device *dev;
 
+		syspath = udev_list_entry_get_name(entry);
+		dev = udev_device_new_from_syspath(udev, syspath);
+
+		udev_handle_dev_action(dev, "add");
+
+		udev_device_unref(dev);
+	}
+
+	udev_enumerate_unref(enumerate);
 	return 0;
+
+fail:
+	udev_enumerate_unref(enumerate);
+	return -1;
 }
 
-static int udev_destructor(void *p)
+static int udev_setup_monitor(struct udev *udev, struct udev_monitor **monitor)
 {
-	struct udev *udev = p;
+	int result;
+	struct udev_monitor *m;
 
-	if (udev->socket >= 0)
-		close(udev->socket);
+	*monitor = NULL;
+	m = udev_monitor_new_from_netlink(udev, "udev");
 
+	if (!m) {
+		pb_log("udev_monitor_new_from_netlink failed\n");
+		goto out_err;
+	}
+
+	result = udev_monitor_filter_add_match_subsystem_devtype(m, "block",
+		NULL);
+
+	if (result) {
+		pb_log("udev_monitor_filter_add_match_subsystem_devtype failed\n");
+		goto out_err;
+	}
+
+	result = udev_monitor_enable_receiving(m);
+
+	if (result) {
+		pb_log("udev_monitor_enable_receiving failed\n");
+		goto out_err;
+	}
+
+	*monitor = m;
 	return 0;
+
+out_err:
+	udev_monitor_unref(m);
+	return -1;
 }
 
-struct udev *udev_init(void)
+/*
+ * udev_process - waiter callback for monitor netlink.
+ */
+
+static int udev_process(void *arg)
 {
-	struct sockaddr_un addr;
-	struct udev *udev;
+	struct udev_monitor *monitor = arg;
+	struct udev_device *dev;
+	const char *action;
+	int result;
 
-	unlink(PBOOT_DEVICE_SOCKET);
+	dev = udev_monitor_receive_device(monitor);
 
-	udev = talloc(NULL, struct udev);
+	if (!dev) {
+		pb_log("udev_monitor_receive_device failed\n");
+		return -1;
+	}
 
-	udev->socket = socket(PF_UNIX, SOCK_DGRAM, 0);
-	if (udev->socket < 0) {
-		pb_log("Error creating udev socket: %s\n", strerror(errno));
-		goto out_err;
+	action = udev_device_get_action(dev);
+
+	if (!action) {
+		pb_log("udev_device_get_action failed\n");
+		goto fail;
 	}
 
+	result = udev_handle_dev_action(dev, action);
+
+	udev_device_unref(dev);
+	return result;
+
+fail:
+	udev_device_unref(dev);
+	return -1;
+}
+
+static void udev_log_fn(struct udev __attribute__((unused)) *udev,
+	int __attribute__((unused)) priority, const char *file, int line,
+	const char *fn, const char *format, va_list args)
+{
+      pb_log("libudev: %s %s:%d: ", fn, file, line);
+      vfprintf(pb_log_get_stream(), format, args);
+}
+
+struct pb_udev *udev_init(struct waitset *waitset,
+	struct device_handler *handler)
+{
+	int result;
+	struct pb_udev *udev = talloc(NULL, struct pb_udev);
+
 	talloc_set_destructor(udev, udev_destructor);
+	udev->handler = handler;
 
-	addr.sun_family = AF_UNIX;
-	strcpy(addr.sun_path, PBOOT_DEVICE_SOCKET);
+	udev->udev = udev_new();
 
-	if (bind(udev->socket, (struct sockaddr *)&addr, sizeof(addr))) {
-		pb_log("Error binding udev socket: %s\n", strerror(errno));
-		goto out_err;
+	if (!udev->udev) {
+		pb_log("udev_new failed\n");
+		goto fail_new;
 	}
 
-	waiter_register(udev->socket, WAIT_IN, udev_process, udev);
+	udev_set_userdata(udev->udev, udev);
+
+	udev_set_log_fn(udev->udev, udev_log_fn);
+
+	result = udev_enumerate(udev->udev);
+
+	if (result)
+		goto fail_enumerate;
+
+	result = udev_setup_monitor(udev->udev, &udev->monitor);
+
+	if (result)
+		goto fail_monitor;
+
+	waiter_register_io(waitset, udev_monitor_get_fd(udev->monitor), WAIT_IN,
+		udev_process, udev->monitor);
+
+	pb_debug("%s: waiting on udev\n", __func__);
 
 	return udev;
 
-out_err:
+fail_monitor:
+fail_enumerate:
+	udev_unref(udev->udev);
+fail_new:
 	talloc_free(udev);
 	return NULL;
 }
 
-void udev_destroy(struct udev *udev)
+void udev_destroy(struct pb_udev *udev)
 {
 	talloc_free(udev);
 }