git.ozlabs.org Git - petitboot/blob - discover/paths.c

   1 #define _GNU_SOURCE
   2
   3 #include <string.h>
   4 #include <stdio.h>
   5 #include <stdlib.h>
   6
   7 #include <talloc/talloc.h>
   8
   9 #include "paths.h"
  10
  11 #define DEVICE_MOUNT_BASE (LOCAL_STATE_DIR "/petitboot/mnt")
  12
  13 struct mount_map {
  14         char *dev, *mnt;
  15 };
  16
  17 static struct mount_map *mount_map;
  18 static int mount_map_size;
  19
  20 static int is_prefix(const char *str, const char *prefix)
  21 {
  22         return !strncmp(str, prefix, strlen(prefix));
  23 }
  24
  25 static int is_prefix_ignorecase(const char *str, const char *prefix)
  26 {
  27         return !strncasecmp(str, prefix, strlen(prefix));
  28 }
  29
  30 const char *mount_base(void)
  31 {
  32         return DEVICE_MOUNT_BASE;
  33 }
  34
  35 char *encode_label(void *alloc_ctx, const char *label)
  36 {
  37         char *str, *c;
  38         unsigned int i;
  39
  40         /* the label can be expanded by up to four times */
  41         str = talloc_size(alloc_ctx, strlen(label) * 4 + 1);
  42         c = str;
  43
  44         for (i = 0; i < strlen(label); i++) {
  45
  46                 if (label[i] == '/' || label[i] == '\\') {
  47                         sprintf(c, "\\x%02x", label[i]);
  48                         c += 4;
  49                         continue;
  50                 }
  51
  52                 *(c++) = label[i];
  53         }
  54
  55         *c = '\0';
  56
  57         return str;
  58 }
  59
  60 char *parse_device_path(void *alloc_ctx,
  61                 const char *dev_str, const char *cur_dev)
  62 {
  63         char *dev, tmp[256], *enc;
  64
  65         if (is_prefix_ignorecase(dev_str, "uuid=")) {
  66                 dev = talloc_asprintf(alloc_ctx, "/dev/disk/by-uuid/%s",
  67                                 dev_str + strlen("uuid="));
  68                 return dev;
  69         }
  70
  71         if (is_prefix_ignorecase(dev_str, "label=")) {
  72                 enc = encode_label(NULL, dev_str + strlen("label="));
  73                 dev = talloc_asprintf(alloc_ctx, "/dev/disk/by-label/%s", enc);
  74                 talloc_free(enc);
  75                 return dev;
  76         }
  77
  78         /* normalise '/dev/foo' to 'foo' for easy comparisons, we'll expand
  79          * back before returning.
  80          */
  81         if (is_prefix(dev_str, "/dev/"))
  82                 dev_str += strlen("/dev/");
  83
  84         /* PS3 hack: if we're reading from a ps3dx device, and we refer to
  85          * a sdx device, remap to ps3dx */
  86         if (cur_dev && is_prefix(cur_dev, "/dev/ps3d")
  87                         && is_prefix(dev_str, "sd")) {
  88                 snprintf(tmp, 255, "ps3d%s", dev_str + 2);
  89                 dev_str = tmp;
  90         }
  91
  92         return join_paths(alloc_ctx, "/dev", dev_str);
  93 }
  94
  95 const char *mountpoint_for_device(const char *dev)
  96 {
  97         int i;
  98
  99         if (is_prefix(dev, "/dev/"))
 100                 dev += strlen("/dev/");
 101
 102         /* check existing entries in the map */
 103         for (i = 0; i < mount_map_size; i++)
 104                 if (!strcmp(mount_map[i].dev, dev))
 105                         return mount_map[i].mnt;
 106
 107         /* no existing entry, create a new one */
 108         i = mount_map_size++;
 109         mount_map = talloc_realloc(NULL, mount_map,
 110                         struct mount_map, mount_map_size);
 111
 112         mount_map[i].dev = talloc_strdup(mount_map, dev);
 113         mount_map[i].mnt = join_paths(mount_map, DEVICE_MOUNT_BASE, dev);
 114         return mount_map[i].mnt;
 115 }
 116
 117 char *resolve_path(void *alloc_ctx, const char *path, const char *current_dev)
 118 {
 119         char *ret;
 120         const char *devpath, *sep;
 121
 122         sep = strchr(path, ':');
 123         if (!sep) {
 124                 devpath = mountpoint_for_device(current_dev);
 125                 ret = join_paths(alloc_ctx, devpath, path);
 126         } else {
 127                 /* parse just the device name into dev */
 128                 char *tmp, *dev;
 129                 tmp = talloc_strndup(NULL, path, sep - path);
 130                 dev = parse_device_path(NULL, tmp, current_dev);
 131
 132                 devpath = mountpoint_for_device(dev);
 133                 ret = join_paths(alloc_ctx, devpath, sep + 1);
 134
 135                 talloc_free(dev);
 136                 talloc_free(tmp);
 137         }
 138
 139         return ret;
 140 }
 141
 142 char *join_paths(void *alloc_ctx, const char *a, const char *b)
 143 {
 144         char *full_path;
 145
 146         full_path = talloc_array(alloc_ctx, char, strlen(a) + strlen(b) + 2);
 147
 148         strcpy(full_path, a);
 149         if (b[0] != '/' && a[strlen(a) - 1] != '/')
 150                 strcat(full_path, "/");
 151         strcat(full_path, b);
 152
 153         return full_path;
 154 }
 155