chiark / gitweb /
[PATCH] Add initial SELinux support for udev
[elogind.git] / udev-add.c
index 54af7e4d77bd0494dbbbf671a8495664ae354975..2f64b4375ab8019409f289f48b4cb2cd22f14171 100644 (file)
 #include <fcntl.h>
 #include <unistd.h>
 #include <errno.h>
-
+#include <sys/stat.h>
+#include <sys/types.h>
+#include <grp.h>
+#ifndef __KLIBC__
+#include <pwd.h>
+#endif
+
+#include "libsysfs/sysfs/libsysfs.h"
 #include "udev.h"
 #include "udev_version.h"
+#include "udev_dbus.h"
+#include "udev_selinux.h"
+#include "logging.h"
 #include "namedev.h"
-#include "libsysfs/libsysfs.h"
-
-
-static char sysfs_path[SYSFS_PATH_MAX];
+#include "udevdb.h"
+#include "klibc_fixups.h"
 
 /* 
  * Right now the major/minor of a device is stored in a file called
  * "dev" in sysfs.
  * The number is stored as:
- *     MMmm
+ *     MM:mm
  *             MM is the major
  *             mm is the minor
- *             The value is in hex.
- * Yes, this will probably change when we go to a bigger major/minor
- * range, and will have to be changed at that time.
+ *             The value is in decimal.
  */
-static int get_major_minor(struct sysfs_class_device *class_dev, int *major, int *minor)
+static int get_major_minor(struct sysfs_class_device *class_dev, struct udevice *udev)
 {
        int retval = -ENODEV;
+       struct sysfs_attribute *attr = NULL;
 
-       char *dev;
-
-       dev = sysfs_get_value_from_attributes(class_dev->directory->attributes, "dev");
-       if (dev == NULL)
+       attr = sysfs_get_classdev_attr(class_dev, "dev");
+       if (attr == NULL)
                goto exit;
+       dbg("dev='%s'", attr->value);
 
-       dbg("dev = %s", dev);
-
-       if (sscanf(dev, "%u:%u", major, minor) != 2)
+       if (sscanf(attr->value, "%u:%u", &udev->major, &udev->minor) != 2)
                goto exit;
-
-       dbg("found major = %d, minor = %d", *major, *minor);
+       dbg("found major=%d, minor=%d", udev->major, udev->minor);
 
        retval = 0;
 exit:
        return retval;
 }
 
-/*
- * We also want to add some permissions here, and possibly some symlinks
- */
-static int create_node(char *name, char type, int major, int minor, int mode)
+static int create_path(char *file)
 {
-       char *argv[7];
-       char mode_string[100];
-       char type_string[3];
-       char major_string[20];
-       char minor_string[20];
+       char p[NAME_SIZE];
+       char *pos;
+       int retval;
+       struct stat stats;
+       
+       strfieldcpy(p, file);
+       pos = strchr(p+1, '/');
+       while (1) {
+               pos = strchr(pos+1, '/');
+               if (pos == NULL)
+                       break;
+               *pos = 0x00;
+               if (stat(p, &stats)) {
+                       retval = mkdir(p, 0755);
+                       if (retval != 0) {
+                               dbg("mkdir(%s) failed with error '%s'",
+                                   p, strerror(errno));
+                               return retval;
+                       }
+                       dbg("created '%s'", p);
+               }
+               *pos = '/';
+       }
+       return 0;
+}
+
+static int make_node(char *filename, int major, int minor, unsigned int mode, uid_t uid, gid_t gid)
+{
+       int retval;
+
+       retval = mknod(filename, mode, makedev(major, minor));
+       if (retval != 0) {
+               dbg("mknod(%s, %#o, %u, %u) failed with error '%s'",
+                   filename, mode, major, minor, strerror(errno));
+               return retval;
+       }
+
+       dbg("chmod(%s, %#o)", filename, mode);
+       retval = chmod(filename, mode);
+       if (retval != 0) {
+               dbg("chmod(%s, %#o) failed with error '%s'",
+                   filename, mode, strerror(errno));
+               return retval;
+       }
+
+       if (uid != 0 || gid != 0) {
+               dbg("chown(%s, %u, %u)", filename, uid, gid);
+               retval = chown(filename, uid, gid);
+               if (retval != 0) {
+                       dbg("chown(%s, %u, %u) failed with error '%s'",
+                           filename, uid, gid, strerror(errno));
+                       return retval;
+               }
+       }
+
+       return 0;
+}
+
+static int create_node(struct udevice *dev, int fake)
+{
+       struct stat stats;
        char filename[255];
+       char linktarget[255];
+       char partitionname[255];
+       char *linkname;
+       char *symlinks;
        int retval = 0;
+       uid_t uid = 0;
+       gid_t gid = 0;
+       int i;
+       int tail;
+
+       strfieldcpy(filename, udev_root);
+       strfieldcat(filename, dev->name);
+
+       switch (dev->type) {
+       case 'b':
+               dev->mode |= S_IFBLK;
+               break;
+       case 'c':
+       case 'u':
+               dev->mode |= S_IFCHR;
+               break;
+       case 'p':
+               dev->mode |= S_IFIFO;
+               break;
+       default:
+               dbg("unknown node type %c\n", dev->type);
+               return -EINVAL;
+       }
 
-       strncpy(filename, UDEV_ROOT, sizeof(filename));
-       strncat(filename, name, sizeof(filename));
+       /* create parent directories if needed */
+       if (strrchr(dev->name, '/'))
+               create_path(filename);
+
+       if (dev->owner[0] != '\0') {
+               char *endptr;
+               unsigned long id = strtoul(dev->owner, &endptr, 10);
+               if (endptr[0] == '\0')
+                       uid = (uid_t) id;
+               else {
+                       struct passwd *pw = getpwnam(dev->owner);
+                       if (pw == NULL)
+                               dbg("specified user unknown '%s'", dev->owner);
+                       else
+                               uid = pw->pw_uid;
+               }
+       }
 
-       snprintf(mode_string, sizeof(mode_string), "--mode=%#o", mode);
-       snprintf(type_string, sizeof(type_string), "%c", type);
-       snprintf(major_string, sizeof(major_string), "%d", major);
-       snprintf(minor_string, sizeof(minor_string), "%d", minor);
-       
-       argv[0] = MKNOD;
-       argv[1] = mode_string;
-       argv[2] = filename;
-       argv[3] = type_string;
-       argv[4] = major_string;
-       argv[5] = minor_string;
-       argv[6] = NULL;
-       dbg ("executing %s %s %s %s %s %s",
-               argv[0], argv[1], argv[2], argv[3], argv[4], argv[5]);
-       switch (fork()) {
-               case 0:
-                       /* we are the child, so lets run the program */
-                       execv (MKNOD, argv);
-                       exit(0);
-                       break;
-               case (-1):
-                       dbg ("fork failed.");
-                       retval = -EFAULT;
-                       break;
-               default:
-                       break;
+       if (dev->group[0] != '\0') {
+               char *endptr;
+               unsigned long id = strtoul(dev->group, &endptr, 10);
+               if (endptr[0] == '\0')
+                       gid = (gid_t) id;
+               else {
+                       struct group *gr = getgrnam(dev->group);
+                       if (gr == NULL)
+                               dbg("specified group unknown '%s'", dev->group);
+                       else
+                               gid = gr->gr_gid;
+               }
+       }
+
+       if (!fake) {
+               info("creating device node '%s'", filename);
+               make_node(filename, dev->major, dev->minor, dev->mode, uid, gid);
+       } else {
+               info("creating device node '%s', major = '%d', minor = '%d', "
+                    "mode = '%#o', uid = '%d', gid = '%d'", filename,
+                    dev->major, dev->minor, (mode_t)dev->mode, uid, gid);
+       }
+
+       /* create partitions if requested */
+       if (dev->partitions > 0) {
+               info("creating device partition nodes '%s[1-%i]'", filename, dev->partitions);
+               if (!fake) {
+                       for (i = 1; i <= dev->partitions; i++) {
+                               sprintf(partitionname, "%s%i", filename, i);
+                               make_node(partitionname, dev->major,
+                                         dev->minor + i, dev->mode, uid, gid);
+                       }
+               }
        }
+
+       if (!fake)
+               selinux_add_node(filename);
+
+       /* create symlink if requested */
+       if (dev->symlink[0] != '\0') {
+               symlinks = dev->symlink;
+               while (1) {
+                       linkname = strsep(&symlinks, " ");
+                       if (linkname == NULL || linkname[0] == '\0')
+                               break;
+
+                       strfieldcpy(filename, udev_root);
+                       strfieldcat(filename, linkname);
+                       dbg("symlink '%s' to node '%s' requested", filename, dev->name);
+                       if (!fake)
+                               if (strrchr(linkname, '/'))
+                                       create_path(filename);
+
+                       /* optimize relative link */
+                       linktarget[0] = '\0';
+                       i = 0;
+                       tail = 0;
+                       while ((dev->name[i] == linkname[i]) && dev->name[i]) {
+                               if (dev->name[i] == '/')
+                                       tail = i+1;
+                               i++;
+                       }
+                       while (linkname[i] != '\0') {
+                               if (linkname[i] == '/')
+                                       strfieldcat(linktarget, "../");
+                               i++;
+                       }
+
+                       if (linktarget[0] == '\0')
+                               strfieldcpy(linktarget, "./");
+                       strfieldcat(linktarget, &dev->name[tail]);
+
+                       /* unlink existing files to ensure that our symlink is created */
+                       if (!fake && (lstat(filename, &stats) == 0)) {
+                               if ((stats.st_mode & S_IFMT) != S_IFDIR) {
+                                       if (unlink(filename))
+                                               dbg("unlink(%s) failed with error '%s'",
+                                                   filename, strerror(errno));
+                               }
+                       }
+
+                       dbg("symlink(%s, %s)", linktarget, filename);
+                       if (!fake) {
+                               retval = symlink(linktarget, filename);
+                               if (retval != 0)
+                                       dbg("symlink(%s, %s) failed with error '%s'",
+                                           linktarget, filename, strerror(errno));
+                       }
+               }
+       }
+
        return retval;
 }
 
-struct sysfs_class_device *get_class_dev(char *device_name)
+static struct sysfs_class_device *get_class_dev(char *device_name)
 {
        char dev_path[SYSFS_PATH_MAX];
-       struct sysfs_class_device *class_dev;
+       struct sysfs_class_device *class_dev = NULL;
 
-       strcpy(dev_path, sysfs_path);
-       strcat(dev_path, device_name);
-
-       dbg("looking at %s", dev_path);
+       strfieldcpy(dev_path, sysfs_path);
+       strfieldcat(dev_path, device_name);
+       dbg("looking at '%s'", dev_path);
 
        /* open up the sysfs class device for this thing... */
-       class_dev = sysfs_open_class_device(dev_path);
+       class_dev = sysfs_open_class_device_path(dev_path);
        if (class_dev == NULL) {
-               dbg ("sysfs_open_class_device failed");
-               return NULL;
+               dbg ("sysfs_open_class_device_path failed");
+               goto exit;
        }
-       dbg("class_dev->name = %s", class_dev->name);
+       dbg("class_dev->name='%s'", class_dev->name);
 
+exit:
        return class_dev;
 }
 
-static int udev_init(void)
+/* wait for the "dev" file to show up in the directory in sysfs.
+ * If it doesn't happen in about 10 seconds, give up.
+ */
+#define SECONDS_TO_WAIT_FOR_DEV                10
+static int sleep_for_dev(char *path)
 {
+       char filename[SYSFS_PATH_MAX + 6];
+       int loop = SECONDS_TO_WAIT_FOR_DEV;
        int retval;
 
-       retval = sysfs_get_mnt_path(sysfs_path, SYSFS_PATH_MAX);
-       dbg("sysfs_path = %s", sysfs_path);
+       strfieldcpy(filename, sysfs_path);
+       strfieldcat(filename, path);
+       strfieldcat(filename, "/dev");
+
+       while (loop--) {
+               struct stat buf;
+
+               dbg("looking for '%s'", filename);
+               retval = stat(filename, &buf);
+               if (retval == 0)
+                       goto exit;
+
+               /* sleep to give the kernel a chance to create the dev file */
+               sleep(1);
+       }
+       retval = -ENODEV;
+exit:
        return retval;
 }
 
-int udev_add_device(char *device, char *subsystem)
+int udev_add_device(char *path, char *subsystem, int fake)
 {
-       struct sysfs_class_device *class_dev;
-       struct device_attr attr;
-       //char *name;
-       int major;
-       int minor;
-       char type;
-       //int mode;
+       struct sysfs_class_device *class_dev = NULL;
+       struct udevice dev;
        int retval = -EINVAL;
 
-       /* sleep for a second or two to give the kernel a chance to
-        * create the dev file
-        */
-       sleep(1);
-
-       udev_init();
+       memset(&dev, 0x00, sizeof(dev));
 
        /* for now, the block layer is the only place where block devices are */
        if (strcmp(subsystem, "block") == 0)
-               type = 'b';
+               dev.type = 'b';
        else
-               type = 'c';
+               dev.type = 'c';
 
-       class_dev = get_class_dev(device);
-       if (class_dev == NULL)
+       retval = sleep_for_dev(path);
+       if (retval != 0)
                goto exit;
 
-       retval = namedev_name_device(class_dev, &attr);
-       if (retval)
-               return retval;
+       class_dev = get_class_dev(path);
+       if (class_dev == NULL)
+               goto exit;
 
-       retval = get_major_minor(class_dev, &major, &minor);
-       if (retval) {
-               dbg ("get_major_minor failed");
+       retval = get_major_minor(class_dev, &dev);
+       if (retval != 0) {
+               dbg("get_major_minor failed");
                goto exit;
        }
 
-       sysfs_close_class_device(class_dev);
+       retval = namedev_name_device(class_dev, &dev);
+       if (retval != 0)
+               goto exit;
+
+       if (!fake) {
+               retval = udevdb_add_dev(path, &dev);
+               if (retval != 0)
+                       dbg("udevdb_add_dev failed, but we are going to try "
+                           "to create the node anyway. But remove might not "
+                           "work properly for this device.");
 
-       return create_node(attr.name, type, major, minor, attr.mode);
+       }
+       dbg("name='%s'", dev.name);
+       retval = create_node(&dev, fake);
+
+       if ((retval == 0) && (!fake))
+               sysbus_send_create(&dev, path);
 
 exit:
+       if (class_dev)
+               sysfs_close_class_device(class_dev);
+
        return retval;
 }
-