-/*
- * compose persisistent device path
- *
- * Copyright (C) 2009 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 Free Software Foundation, either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program. If not, see <http://www.gnu.org/licenses/>.
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <stdarg.h>
-#include <unistd.h>
-#include <string.h>
-#include <ctype.h>
-#include <fcntl.h>
-#include <errno.h>
-#include <dirent.h>
-#include <getopt.h>
-
-#include <libudev.h>
-#include <../../udev/udev.h>
-
-int debug;
-
-static void log_fn(struct udev *udev, int priority,
- const char *file, int line, const char *fn,
- const char *format, va_list args)
-{
- if (debug) {
- fprintf(stderr, "%s: ", fn != NULL ? fn : file);
- vfprintf(stderr, format, args);
- } else {
- vsyslog(priority, format, args);
- }
-}
-
-static int path_prepend(char **path, const char *fmt, ...)
-{
- va_list va;
- char *old;
- char *pre;
- int err;
-
- old = *path;
-
- va_start(va, fmt);
- err = vasprintf(&pre, fmt, va);
- va_end(va);
- if (err < 0)
- return err;
-
- if (old != NULL) {
- err = asprintf(path, "%s-%s", pre, old);
- if (err < 0)
- return err;
- free(pre);
- } else {
- *path = pre;
- }
-
- free(old);
- return 0;
-}
-
-static struct udev_device *skip_subsystem(struct udev_device *dev, const char *subsys)
-{
- struct udev_device *parent = dev;
-
- while (parent != NULL) {
- const char *subsystem;
-
- subsystem = udev_device_get_subsystem(parent);
- if (subsystem == NULL || strcmp(subsystem, subsys) != 0)
- break;
- dev = parent;
- parent = udev_device_get_parent(parent);
- }
- return dev;
-}
-
-/* find smallest number of instances of <syspath>/<name><number> */
-static int base_number(const char *syspath, const char *name)
-{
- char *base;
- char *pos;
- DIR *dir;
- struct dirent *dent;
- size_t len;
- int number = -1;
-
- base = strdup(syspath);
- if (base == NULL)
- goto out;
-
- pos = strrchr(base, '/');
- if (pos == NULL)
- goto out;
- pos[0] = '\0';
-
- len = strlen(name);
- dir = opendir(base);
- if (dir == NULL)
- goto out;
- for (dent = readdir(dir); dent != NULL; dent = readdir(dir)) {
- char *rest;
- int i;
-
- if (dent->d_name[0] == '.')
- continue;
- if (dent->d_type != DT_DIR && dent->d_type != DT_LNK)
- continue;
- if (strncmp(dent->d_name, name, len) != 0)
- continue;
- i = strtoul(&dent->d_name[len], &rest, 10);
- if (rest[0] != '\0')
- continue;
- if (number == -1 || i < number)
- number = i;
- }
- closedir(dir);
-out:
- free(base);
- return number;
-}
-
-static struct udev_device *handle_fc(struct udev_device *parent, char **path)
-{
- path_prepend(path, "fc-PATH_ID_NOT_IMPLEMENTED");
- return parent;
-}
-
-static struct udev_device *handle_sas(struct udev_device *parent, char **path)
-{
- path_prepend(path, "sas-PATH_ID_NOT_IMPLEMENTED");
- return parent;
-}
-
-static struct udev_device *handle_iscsi(struct udev_device *parent, char **path)
-{
- path_prepend(path, "ip-PATH_ID_NOT_IMPLEMENTED");
- return parent;
-}
-
-static struct udev_device *handle_scsi(struct udev_device *parent, char **path)
-{
- struct udev_device *hostdev;
- int host, bus, target, lun;
- const char *name;
- int base;
-
- hostdev = udev_device_get_parent_with_subsystem_devtype(parent, "scsi", "scsi_host");
- if (hostdev == NULL)
- return parent;
-
- name = udev_device_get_sysname(parent);
- if (sscanf(name, "%d:%d:%d:%d", &host, &bus, &target, &lun) != 4)
- return parent;
-
- /* rebase host offset to get the local relative number */
- base = base_number(udev_device_get_syspath(hostdev), "host");
- if (base < 0)
- return parent;
- host -= base;
-
- path_prepend(path, "scsi-%u:%u:%u:%u", host, bus, target, lun);
- return hostdev;
-}
-
-static struct udev_device *handle_scsi_lun(struct udev_device *parent, char **path)
-{
- const char *devtype;
- const char *name;
- const char *id;
-
- devtype = udev_device_get_devtype(parent);
- if (devtype == NULL || strcmp(devtype, "scsi_device") != 0)
- return parent;
-
- /* firewire */
- id = udev_device_get_sysattr_value(parent, "ieee1394_id");
- if (id != NULL) {
- parent = skip_subsystem(parent, "scsi");
- path_prepend(path, "ieee1394-0x%s", id);
- goto out;
- }
-
- name = udev_device_get_syspath(parent);
-
- /* fibre channel */
- if (strstr(name, "/rport-") != NULL) {
- parent = handle_fc(parent, path);
- goto out;
- }
-
- /* sas */
- if (strstr(name, "/end_device-") != NULL) {
- parent = handle_sas(parent, path);
- goto out;
- }
-
- /* iSCSI */
- if (strstr(name, "/session") != NULL) {
- parent = handle_iscsi(parent, path);
- goto out;
- }
-
- /* default */
- parent = handle_scsi(parent, path);
-out:
- return parent;
-}
-
-static void handle_scsi_tape(struct udev_device *dev, char **suffix)
-{
- const char *name;
-
- name = udev_device_get_sysname(dev);
- if (strncmp(name, "nst", 3) == 0 && strchr("lma", name[3]) != NULL)
- asprintf(suffix, "nst%c", name[3]);
- else if (strncmp(name, "st", 2) == 0 && strchr("lma", name[2]) != NULL)
- asprintf(suffix, "st%c", name[2]);
-}
-
-static struct udev_device *handle_usb(struct udev_device *parent, char **path)
-{
- const char *devtype;
- const char *str;
- const char *port;
-
- devtype = udev_device_get_devtype(parent);
- if (devtype == NULL || strcmp(devtype, "usb_interface") != 0)
- return parent;
-
- str = udev_device_get_sysname(parent);
- port = strchr(str, '-');
- if (port == NULL)
- return parent;
- port++;
-
- parent = skip_subsystem(parent, "usb");
- path_prepend(path, "usb-0:%s", port);
- return parent;
-}
-
-static struct udev_device *handle_cciss(struct udev_device *parent, char **path)
-{
- path_prepend(path, "cciss-PATH_ID_NOT_IMPLEMENTED");
- return parent;
-}
-
-static struct udev_device *handle_ccw(struct udev_device *parent, struct udev_device *dev, char **path)
-{
- struct udev_device *scsi_dev;
-
- scsi_dev = udev_device_get_parent_with_subsystem_devtype(dev, "scsi", "scsi_device");
- if (scsi_dev != NULL) {
- const char *wwpn;
- const char *lun;
- const char *hba_id;
-
- hba_id = udev_device_get_sysattr_value(scsi_dev, "hba_id");
- wwpn = udev_device_get_sysattr_value(scsi_dev, "wwpn");
- lun = udev_device_get_sysattr_value(scsi_dev, "fcp_lun");
- if (hba_id != NULL && lun != NULL && wwpn != NULL) {
- path_prepend(path, "ccw-%s-zfcp-%s:%s", hba_id, wwpn, lun);
- goto out;
- }
- }
-
- path_prepend(path, "ccw-%s", udev_device_get_sysname(parent));
-out:
- parent = skip_subsystem(parent, "ccw");
- return parent;
-}
-
-int main(int argc, char **argv)
-{
- static const struct option options[] = {
- { "debug", no_argument, NULL, 'd' },
- { "help", no_argument, NULL, 'h' },
- {}
- };
- struct udev *udev;
- struct udev_device *dev;
- struct udev_device *parent;
- char syspath[UTIL_PATH_SIZE];
- const char *devpath;
- char *path;
- char *path_suffix;
- int rc = 1;
-
- udev = udev_new();
- if (udev == NULL)
- goto exit;
-
- logging_init("usb_id");
- udev_set_log_fn(udev, log_fn);
-
- while (1) {
- int option;
-
- option = getopt_long(argc, argv, "dh", options, NULL);
- if (option == -1)
- break;
-
- switch (option) {
- case 'd':
- debug = 1;
- if (udev_get_log_priority(udev) < LOG_INFO)
- udev_set_log_priority(udev, LOG_INFO);
- break;
- case 'h':
- printf("Usage: path_id [--debug] [--help] <devpath>\n"
- " --debug print debug information\n"
- " --help print this help text\n\n");
- default:
- rc = 1;
- goto exit;
- }
- }
-
- devpath = argv[optind];
- if (devpath == NULL) {
- fprintf(stderr, "No device specified\n");
- rc = 2;
- goto exit;
- }
-
- util_strscpyl(syspath, sizeof(syspath), udev_get_sys_path(udev), devpath, NULL);
- dev = udev_device_new_from_syspath(udev, syspath);
- if (dev == NULL) {
- fprintf(stderr, "unable to access '%s'\n", devpath);
- rc = 3;
- goto exit;
- }
-
- path = NULL;
- path_suffix = NULL;
-
- /* S390 ccw bus */
- parent = udev_device_get_parent_with_subsystem_devtype(dev, "ccw", NULL);
- if (parent != NULL) {
- handle_ccw(parent, dev, &path);
- goto out;
- }
-
- /* walk up the chain of devices and compose path */
- parent = dev;
- while (parent != NULL) {
- const char *subsys;
-
- subsys = udev_device_get_subsystem(parent);
-
- if (subsys == NULL) {
- ;
- } else if (strcmp(subsys, "scsi_tape") == 0) {
- handle_scsi_tape(parent, &path_suffix);
- } else if (strcmp(subsys, "scsi") == 0) {
- parent = handle_scsi_lun(parent, &path);
- } else if (strcmp(subsys, "cciss") == 0) {
- handle_cciss(parent, &path);
- } else if (strcmp(subsys, "usb") == 0) {
- parent = handle_usb(parent, &path);
- } else if (strcmp(subsys, "serio") == 0) {
- path_prepend(&path, "serio-%s", udev_device_get_sysnum(parent));
- parent = skip_subsystem(parent, "serio");
- } else if (strcmp(subsys, "pci") == 0) {
- path_prepend(&path, "pci-%s", udev_device_get_sysname(parent));
- parent = skip_subsystem(parent, "pci");
- } else if (strcmp(subsys, "platform") == 0) {
- path_prepend(&path, "platform-%s", udev_device_get_sysname(parent));
- parent = skip_subsystem(parent, "platform");
- } else if (strcmp(subsys, "xen") == 0) {
- path_prepend(&path, "xen-%s", udev_device_get_sysname(parent));
- parent = skip_subsystem(parent, "xen");
- }
-
- parent = udev_device_get_parent(parent);
- }
-out:
- if (path != NULL) {
- if (path_suffix != NULL) {
- printf("ID_PATH=%s%s\n", path, path_suffix);
- free(path_suffix);
- } else {
- printf("ID_PATH=%s\n", path);
- }
- free(path);
- rc = 0;
- }
-
- udev_device_unref(dev);
-exit:
- udev_unref(udev);
- logging_close();
- return rc;
-}
~ianmdlvl / elogind.git / blobdiff