X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=elogind.git;a=blobdiff_plain;f=udevinfo.c;h=fc45f7565d192e778173b15bc9d293c69ce62dd8;hp=01c2a2a8ae646a6cd0d19e67a8052f2816cf5393;hb=225cb03bd851adc6d269b13bdf2b1bfded2b96b9;hpb=8ea84a8a781c22f67def088eb9df581590393cda

diff --git a/udevinfo.c b/udevinfo.c
index 01c2a2a8a..fc45f7565 100644
--- a/udevinfo.c
+++ b/udevinfo.c
@@ -1,8 +1,5 @@
 /*
- * udevinfo - fetches attributes for a device
- *
- * Copyright (C) 2004 Kay Sievers <kay.sievers@vrfy.org>
- *
+ * Copyright (C) 2004-2006 Kay Sievers <kay.sievers@vrfy.org>
  *
  *	This program is free software; you can redistribute it and/or modify it
  *	under the terms of the GNU General Public License as published by the
@@ -15,435 +12,427 @@
  * 
  *	You should have received a copy of the GNU General Public License along
  *	with this program; if not, write to the Free Software Foundation, Inc.,
- *	675 Mass Ave, Cambridge, MA 02139, USA.
+ *	51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  *
  */
 
 #include <stdlib.h>
 #include <string.h>
 #include <stdio.h>
+#include <stddef.h>
 #include <ctype.h>
 #include <stdarg.h>
 #include <unistd.h>
+#include <dirent.h>
 #include <errno.h>
+#include <getopt.h>
+#include <sys/stat.h>
+#include <sys/types.h>
 
-#include "libsysfs/sysfs/libsysfs.h"
-#include "libsysfs/dlist.h"
 #include "udev.h"
-#include "udev_version.h"
-#include "logging.h"
-#include "udevdb.h"
-
-
-# define SYSFS_VALUE_MAX 200
 
-char **main_argv;
-int main_argc;
-
-#ifdef LOG
-unsigned char logname[42];
-void log_message (int level, const char *format, ...)
+static void print_all_attributes(const char *devpath, const char *key)
 {
-	va_list	args;
-
-	va_start(args, format);
-	vsyslog(level, format, args);
-	va_end(args);
-}
-#endif
+	char path[PATH_SIZE];
+	DIR *dir;
+	struct dirent *dent;
+
+	strlcpy(path, sysfs_path, sizeof(path));
+	strlcat(path, devpath, sizeof(path));
+
+	dir = opendir(path);
+	if (dir != NULL) {
+		for (dent = readdir(dir); dent != NULL; dent = readdir(dir)) {
+			struct stat statbuf;
+			char filename[PATH_SIZE];
+			char *attr_value;
+			char value[NAME_SIZE];
+			size_t len;
+
+			if (dent->d_name[0] == '.')
+				continue;
 
-static int print_all_attributes(const char *path)
-{
-	struct dlist *attributes;
-	struct sysfs_attribute *attr;
-	struct sysfs_directory *sysfs_dir;
-	char value[SYSFS_VALUE_MAX];
-	int len;
-	int retval = 0;
-
-	sysfs_dir = sysfs_open_directory(path);
-	if (sysfs_dir == NULL)
-		return -1;
+			if (strcmp(dent->d_name, "uevent") == 0)
+				continue;
 
-	attributes = sysfs_get_dir_attributes(sysfs_dir);
-	if (attributes == NULL) {
-		retval = -1;
-		goto exit;
-	}
+			strlcpy(filename, path, sizeof(filename));
+			strlcat(filename, "/", sizeof(filename));
+			strlcat(filename, dent->d_name, sizeof(filename));
+			if (lstat(filename, &statbuf) != 0)
+				continue;
+			if (S_ISLNK(statbuf.st_mode))
+				continue;
 
-	dlist_for_each_data(attributes, attr, struct sysfs_attribute) {
-		if (attr->value != NULL) {
-			strfieldcpy(value, attr->value);
-			len = strlen(value);
-			if (len == 0)
+			attr_value = sysfs_attr_get_value(devpath, dent->d_name);
+			if (attr_value == NULL)
 				continue;
+			len = strlcpy(value, attr_value, sizeof(value));
+			if(len >= sizeof(value))
+				len = sizeof(value) - 1;
+			dbg("attr '%s'='%s'(%zi)", dent->d_name, value, len);
 
-			/* remove trailing newline */
-			if (value[len-1] == '\n') {
-				value[len-1] = '\0';
-				len--;
-			}
+			/* remove trailing newlines */
+			while (len && value[len-1] == '\n')
+				value[--len] = '\0';
 
-			/* skip nonprintable values */
-			while (len) {
-				if (isprint(value[len-1]) == 0)
-					break;
+			/* skip nonprintable attributes */
+			while (len && isprint(value[len-1]))
 				len--;
+			if (len) {
+				dbg("attribute value of '%s' non-printable, skip", dent->d_name);
+				continue;
 			}
-			if (len == 0)
-				printf("    SYSFS{%s}=\"%s\"\n", attr->name, value);
+
+			replace_chars(value, ALLOWED_CHARS_INPUT);
+			printf("    %s{%s}==\"%s\"\n", key, dent->d_name, value);
 		}
 	}
 	printf("\n");
-
-exit:
-	sysfs_close_directory(sysfs_dir);
-
-	return retval;
 }
 
-/* callback for database dump */
-static int print_record(char *path, struct udevice *dev)
+static int print_device_chain(const char *devpath)
 {
-	printf("P: %s\n", path);
-	printf("N: %s\n", dev->name);
-	printf("M: %#o\n", dev->mode);
-	printf("S: %s\n", dev->symlink);
-	printf("O: %s\n", dev->owner);
-	printf("G: %s\n", dev->group);
-	printf("\n");
-	return 0;
-}
+	struct sysfs_device *dev;
 
-enum query_type {
-	NONE,
-	NAME,
-	PATH,
-	SYMLINK,
-	MODE,
-	OWNER,
-	GROUP,
-	ALL
-};
-
-static int print_device_chain(const char *path)
-{
-	struct sysfs_class_device *class_dev;
-	struct sysfs_class_device *class_dev_parent;
-	struct sysfs_attribute *attr;
-	struct sysfs_device *sysfs_dev;
-	struct sysfs_device *sysfs_dev_parent;
-	int retval = 0;
-
-	/*  get the class dev */
-	class_dev = sysfs_open_class_device_path(path);
-	if (class_dev == NULL) {
-		printf("couldn't get the class device\n");
+	dev = sysfs_device_get(devpath);
+	if (dev == NULL)
 		return -1;
-	}
 
-	/* read the 'dev' file for major/minor*/
-	attr = sysfs_get_classdev_attr(class_dev, "dev");
-	if (attr == NULL) {
-		printf("couldn't get the \"dev\" file\n");
-		retval = -1;
-		goto exit;
-	}
-	printf("\ndevice '%s' has major:minor %s", class_dev->path, attr->value);
-	sysfs_close_attribute(attr);
-
-	/* open sysfs class device directory and print all attributes */
-	printf("  looking at class device '%s':\n", class_dev->path);
-	if (print_all_attributes(class_dev->path) != 0) {
-		printf("couldn't open class device directory\n");
-		retval = -1;
-		goto exit;
-	}
+	printf("\n"
+	       "Udevinfo starts with the device specified by the devpath and then\n"
+	       "walks up the chain of parent devices. It prints for every device\n"
+	       "found, all possible attributes in the udev rules key format.\n"
+	       "A rule to match, can be composed by the attributes of the device\n"
+	       "and the attributes from one single parent device.\n"
+	       "\n");
 
-	/* get the device link (if parent exists look here) */
-	class_dev_parent = sysfs_get_classdev_parent(class_dev);
-	if (class_dev_parent != NULL) {
-		//sysfs_close_class_device(class_dev);
-		class_dev = class_dev_parent;
-	}
-	sysfs_dev = sysfs_get_classdev_device(class_dev);
-	if (sysfs_dev != NULL)
-		printf("follow the class device's \"device\"\n");
+	printf("  looking at device '%s':\n", dev->devpath);
+	printf("    KERNEL==\"%s\"\n", dev->kernel);
+	printf("    SUBSYSTEM==\"%s\"\n", dev->subsystem);
+	printf("    DRIVER==\"%s\"\n", dev->driver);
+	print_all_attributes(dev->devpath, "ATTR");
+
+	/* walk up the chain of devices */
+	while (1) {
+		dev = sysfs_device_get_parent(dev);
+		if (dev == NULL)
+			break;
+		printf("  looking at parent device '%s':\n", dev->devpath);
+		printf("    KERNELS==\"%s\"\n", dev->kernel);
+		printf("    SUBSYSTEMS==\"%s\"\n", dev->subsystem);
+		printf("    DRIVERS==\"%s\"\n", dev->driver);
 
-	/* look the device chain upwards */
-	while (sysfs_dev != NULL) {
-		printf("  looking at the device chain at '%s':\n", sysfs_dev->path);
-		printf("    BUS=\"%s\"\n", sysfs_dev->bus);
-		printf("    ID=\"%s\"\n", sysfs_dev->bus_id);
+		print_all_attributes(dev->devpath, "ATTRS");
+	}
 
-		/* open sysfs device directory and print all attributes */
-		print_all_attributes(sysfs_dev->path);
+	return 0;
+}
 
-		sysfs_dev_parent = sysfs_get_device_parent(sysfs_dev);
-		if (sysfs_dev_parent == NULL)
-			break;
+static void print_record(struct udevice *udev)
+{
+	struct name_entry *name_loop;
+
+	printf("P: %s\n", udev->dev->devpath);
+	printf("N: %s\n", udev->name);
+	list_for_each_entry(name_loop, &udev->symlink_list, node)
+		printf("S: %s\n", name_loop->name);
+	if (udev->link_priority != 0)
+		printf("L: %i\n", udev->link_priority);
+	if (udev->partitions != 0)
+		printf("A:%u\n", udev->partitions);
+	if (udev->ignore_remove)
+		printf("R:%u\n", udev->ignore_remove);
+	list_for_each_entry(name_loop, &udev->env_list, node)
+		printf("E: %s\n", name_loop->name);
+}
 
-		//sysfs_close_device(sysfs_dev);
-		sysfs_dev = sysfs_dev_parent;
+static void export_db(void) {
+	LIST_HEAD(name_list);
+	struct name_entry *name_loop;
+
+	udev_db_get_all_entries(&name_list);
+	list_for_each_entry(name_loop, &name_list, node) {
+		struct udevice *udev_db;
+
+		udev_db = udev_device_init(NULL);
+		if (udev_db == NULL)
+			continue;
+		if (udev_db_get_device(udev_db, name_loop->name) == 0)
+			print_record(udev_db);
+			printf("\n");
+		udev_device_cleanup(udev_db);
 	}
-	sysfs_close_device(sysfs_dev);
+	name_list_cleanup(&name_list);
+}
 
-exit:
-	//sysfs_close_class_device(class_dev);
-	return retval;
+static int lookup_device_by_name(struct udevice *udev, const char *name)
+{
+	LIST_HEAD(name_list);
+	int count;
+	struct name_entry *device;
+	int rc  = -1;
+
+	count = udev_db_get_devices_by_name(name, &name_list);
+	if (count <= 0)
+		goto out;
+
+	info("found %i devices for '%s'", count, name);
+
+	/* select the device that seems to match */
+	list_for_each_entry(device, &name_list, node) {
+		char filename[PATH_SIZE];
+		struct stat statbuf;
+
+		udev_device_init(udev);
+		if (udev_db_get_device(udev, device->name) != 0)
+			continue;
+		info("found db entry '%s'", device->name);
+
+		/* make sure, we don't get a link of a differnt device */
+		strlcpy(filename, udev_root, sizeof(filename));
+		strlcat(filename, "/", sizeof(filename));
+		strlcat(filename, name, sizeof(filename));
+		if (stat(filename, &statbuf) != 0)
+			continue;
+		if (major(udev->devt) > 0 && udev->devt != statbuf.st_rdev) {
+			info("skip '%s', dev_t doesn't match", udev->name);
+			continue;
+		}
+		rc = 0;
+		break;
+	}
+out:
+	name_list_cleanup(&name_list);
+	return rc;
 }
 
-static int process_options(void)
+int udevinfo(int argc, char *argv[], char *envp[])
 {
-	static const char short_options[] = "adn:p:q:rVh";
 	int option;
-	int retval = 1;
-	struct udevice dev;
+	struct udevice *udev;
 	int root = 0;
-	int attributes = 0;
-	enum query_type query = NONE;
-	char result[NAME_SIZE] = "";
-	char path[NAME_SIZE] = "";
-	char name[NAME_SIZE] = "";
-	char temp[NAME_SIZE];
-	char *pos;
-
-	/* get command line options */
+
+	static const struct option options[] = {
+		{ "name", 1, NULL, 'n' },
+		{ "path", 1, NULL, 'p' },
+		{ "query", 1, NULL, 'q' },
+		{ "attribute-walk", 0, NULL, 'a' },
+		{ "export-db", 0, NULL, 'e' },
+		{ "root", 0, NULL, 'r' },
+		{ "version", 0, NULL, 1 }, /* -V outputs braindead format */
+		{ "help", 0, NULL, 'h' },
+		{}
+	};
+
+	enum action_type {
+		ACTION_NONE,
+		ACTION_QUERY,
+		ACTION_ATTRIBUTE_WALK,
+		ACTION_ROOT,
+	} action = ACTION_NONE;
+
+	enum query_type {
+		QUERY_NONE,
+		QUERY_NAME,
+		QUERY_PATH,
+		QUERY_SYMLINK,
+		QUERY_ENV,
+		QUERY_ALL,
+	} query = QUERY_NONE;
+
+	char path[PATH_SIZE] = "";
+	char name[PATH_SIZE] = "";
+	struct name_entry *name_loop;
+	int rc = 0;
+
+	logging_init("udevinfo");
+	udev_config_init();
+	sysfs_init();
+
+	udev = udev_device_init(NULL);
+	if (udev == NULL) {
+		rc = 1;
+		goto exit;
+	}
+
 	while (1) {
-		option = getopt(main_argc, main_argv, short_options);
+		option = getopt_long(argc, argv, "aen:p:q:rVh", options, NULL);
 		if (option == -1)
 			break;
 
 		dbg("option '%c'", option);
 		switch (option) {
 		case 'n':
-			dbg("udev name: %s\n", optarg);
-			strfieldcpy(name, optarg);
+			/* remove /dev if given */
+			if (strncmp(optarg, udev_root, strlen(udev_root)) == 0)
+				strlcpy(name, &optarg[strlen(udev_root)+1], sizeof(name));
+			else
+				strlcpy(name, optarg, sizeof(name));
+			dbg("name: %s", name);
 			break;
-
 		case 'p':
-			dbg("udev path: %s\n", optarg);
-			strfieldcpy(path, optarg);
+			/* remove /sys if given */
+			if (strncmp(optarg, sysfs_path, strlen(sysfs_path)) == 0)
+				strlcpy(path, &optarg[strlen(sysfs_path)], sizeof(path));
+			else
+				strlcpy(path, optarg, sizeof(path));
+			dbg("path: %s", path);
 			break;
-
 		case 'q':
-			dbg("udev query: %s\n", optarg);
-
+			action = ACTION_QUERY;
 			if (strcmp(optarg, "name") == 0) {
-				query = NAME;
+				query = QUERY_NAME;
 				break;
 			}
-
 			if (strcmp(optarg, "symlink") == 0) {
-				query = SYMLINK;
+				query = QUERY_SYMLINK;
 				break;
 			}
-
-			if (strcmp(optarg, "mode") == 0) {
-				query = MODE;
-				break;
-			}
-
-			if (strcmp(optarg, "owner") == 0) {
-				query = OWNER;
-				break;
-			}
-
-			if (strcmp(optarg, "group") == 0) {
-				query = GROUP;
+			if (strcmp(optarg, "path") == 0) {
+				query = QUERY_PATH;
 				break;
 			}
-
-			if (strcmp(optarg, "path") == 0) {
-				query = PATH;
+			if (strcmp(optarg, "env") == 0) {
+				query = QUERY_ENV;
 				break;
 			}
-
 			if (strcmp(optarg, "all") == 0) {
-				query = ALL;
+				query = QUERY_ALL;
 				break;
 			}
-
-			printf("unknown query type\n");
-			exit(1);
-
+			fprintf(stderr, "unknown query type\n");
+			rc = 2;
+			goto exit;
 		case 'r':
+			if (action == ACTION_NONE)
+				action = ACTION_ROOT;
 			root = 1;
 			break;
-
 		case 'a':
-			attributes = 1;
+			action = ACTION_ATTRIBUTE_WALK;
 			break;
-
-		case 'd':
-			retval = udevdb_open_ro();
-			if (retval != 0) {
-				printf("unable to open udev database\n");
-				exit(2);
-			}
-			udevdb_call_foreach(print_record);
-			udevdb_exit();
-			exit(0);
-
+		case 'e':
+			export_db();
+			goto exit;
+		case 1:
+			printf("%s\n", UDEV_VERSION);
+			goto exit;
 		case 'V':
 			printf("udevinfo, version %s\n", UDEV_VERSION);
-			exit(0);
-
+			goto exit;
 		case 'h':
-			retval = 0;
-		case '?':
+			printf("Usage: udevadm info OPTIONS\n"
+			       "  --query=<type>    query database for the specified value:\n"
+			       "    name            name of device node\n"
+			       "    symlink         pointing to node\n"
+			       "    path            sysfs device path\n"
+			       "    env             the device related imported environment\n"
+			       "    all             all values\n"
+			       "\n"
+			       "  --path=<devpath>  sysfs device path used for query or chain\n"
+			       "  --name=<name>     node or symlink name used for query\n"
+			       "\n"
+			       "  --root            prepend to query result or print udev_root\n"
+			       "  --attribute-walk  print all SYSFS_attributes along the device chain\n"
+			       "  --export-db       export the content of the udev database\n"
+			       "  --help            print this text\n"
+			       "\n");
+			goto exit;
 		default:
-			goto help;
+			goto exit;
 		}
 	}
 
-	/* process options */
-	if (query != NONE) {
-		retval = udevdb_open_ro();
-		if (retval != 0) {
-			printf("unable to open udev database\n");
-			return -EACCES;
-		}
-
+	/* run action */
+	switch (action) {
+	case ACTION_QUERY:
+		/* needs devpath or node/symlink name for query */
 		if (path[0] != '\0') {
-			/* remove sysfs_path if given */
-			if (strncmp(path, sysfs_path, strlen(sysfs_path)) == 0) {
-				pos = path + strlen(sysfs_path);
-			} else {
-				if (path[0] != '/') {
-					/* prepend '/' if missing */
-					strfieldcat(temp, "/");
-					strfieldcat(temp, path);
-					pos = temp;
-				} else {
-					pos = path;
-				}
-			}
-			retval = udevdb_get_dev(pos, &dev);
-			if (retval != 0) {
-				printf("device not found in database\n");
+			if (udev_db_get_device(udev, path) != 0) {
+				fprintf(stderr, "no record for '%s' in database\n", path);
+				rc = 3;
 				goto exit;
 			}
-			goto print;
-		}
-
-		if (name[0] != '\0') {
-			/* remove udev_root if given */
-			if (strncmp(name, udev_root, strlen(udev_root)) == 0) {
-				pos = name + strlen(udev_root);
-			} else
-				pos = name;
-			retval = udevdb_get_dev_byname(pos, path, &dev);
-			if (retval != 0) {
-				printf("device not found in database\n");
+		} else if (name[0] != '\0') {
+			if (lookup_device_by_name(udev, name) != 0) {
+				fprintf(stderr, "node name not found\n");
+				rc = 4;
 				goto exit;
 			}
-			goto print;
+		} else {
+			fprintf(stderr, "query needs --path or node --name specified\n");
+			rc = 4;
+			goto exit;
 		}
 
-		printf("query needs device path(-p) or node name(-n) specified\n");
-		goto exit;
-
-print:
 		switch(query) {
-		case NAME:
+		case QUERY_NAME:
 			if (root)
-				strfieldcpy(result, udev_root);
-			strfieldcat(result, dev.name);
-			break;
-
-		case SYMLINK:
-			strfieldcpy(result, dev.symlink);
-			break;
-
-		case MODE:
-			sprintf(result, "%#o", dev.mode);
+				printf("%s/%s\n", udev_root, udev->name);
+			else
+				printf("%s\n", udev->name);
 			break;
-
-		case GROUP:
-			strfieldcpy(result, dev.group);
+		case QUERY_SYMLINK:
+			list_for_each_entry(name_loop, &udev->symlink_list, node) {
+				char c = name_loop->node.next != &udev->symlink_list ? ' ' : '\n';
+
+				if (root)
+					printf("%s/%s%c", udev_root, name_loop->name, c);
+				else
+					printf("%s%c", name_loop->name, c);
+			}
 			break;
-
-		case OWNER:
-			strfieldcpy(result, dev.owner);
+		case QUERY_PATH:
+			printf("%s\n", udev->dev->devpath);
+			goto exit;
+		case QUERY_ENV:
+			list_for_each_entry(name_loop, &udev->env_list, node)
+				printf("%s\n", name_loop->name);
 			break;
-
-		case PATH:
-			strfieldcpy(result, path);
+		case QUERY_ALL:
+			print_record(udev);
 			break;
-
-		case ALL:
-			print_record(path, &dev);
-			goto exit;
-
 		default:
-			goto exit;
+			fprintf(stderr, "unknown query type\n");
+			break;
 		}
-		printf("%s\n", result);
-
-exit:
-		udevdb_exit();
-		return retval;
-	}
-
-	if (attributes) {
-		if (path[0] == '\0') {
-			printf("attribute walk on device chain needs path(-p) specified\n");
-			return -EINVAL;
-		} else {
-			if (strncmp(path, sysfs_path, strlen(sysfs_path)) != 0) {
-				/* prepend sysfs mountpoint if not given */
-				strfieldcpy(temp, path);
-				strfieldcpy(path, sysfs_path);
-				strfieldcat(path, temp);
+		break;
+	case ACTION_ATTRIBUTE_WALK:
+		if (path[0] != '\0') {
+			if (print_device_chain(path) != 0) {
+				fprintf(stderr, "no valid sysfs device found\n");
+				rc = 4;
+				goto exit;
+			}
+		} else if (name[0] != '\0') {
+			if (lookup_device_by_name(udev, name) != 0) {
+				fprintf(stderr, "node name not found\n");
+				rc = 4;
+				goto exit;
 			}
-			print_device_chain(path);
-			return 0;
+			if (print_device_chain(udev->dev->devpath) != 0) {
+				fprintf(stderr, "no valid sysfs device found\n");
+				rc = 4;
+				goto exit;
+			}
+		} else {
+			fprintf(stderr, "attribute walk needs --path or node --name specified\n");
+			rc = 5;
+			goto exit;
 		}
-	}
-
-	if (root) {
+		break;
+	case ACTION_ROOT:
 		printf("%s\n", udev_root);
-		return 0;
+		break;
+	default:
+		fprintf(stderr, "missing option\n");
+		rc = 1;
+		break;
 	}
 
-help:
-	printf("Usage: [-anpqrdVh]\n"
-	       "  -q TYPE  query database for the specified value:\n"
-	       "             'name'    name of device node\n"
-	       "             'symlink' pointing to node\n"
-	       "             'mode'    permissions of node\n"
-	       "             'owner'   of node\n"
-	       "             'group'   of node\n"
-	       "             'path'    sysfs device path\n"
-	       "             'all'     all values\n"
-	       "\n"
-	       "  -p PATH  sysfs device path used for query or chain\n"
-	       "  -n NAME  node/symlink name used for query\n"
-	       "\n"
-	       "  -r       print udev root\n"
-	       "  -a       print all SYSFS_attributes along the device chain\n"
-	       "  -d       dump whole database\n"
-	       "  -V       print udev version\n"
-	       "  -h       print this help text\n"
-	       "\n");
-	return retval;
-}
-
-int main(int argc, char *argv[], char *envp[])
-{
-	int retval;
-
-	main_argv = argv;
-	main_argc = argc;
-
-	init_logging("udevinfo");
-
-	/* initialize our configuration */
-	udev_init_config();
-
-	retval = process_options();
-	if (retval != 0)
-		exit(1);
-	exit(0);
+exit:
+	udev_device_cleanup(udev);
+	sysfs_cleanup();
+	logging_close();
+	return rc;
 }