libfstools/overlay.c

   1 /*
   2  * Copyright (C) 2014 John Crispin <blogic@openwrt.org>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU Lesser General Public License version 2.1
   6  * as published by the Free Software Foundation
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  * GNU General Public License for more details.
  12  */
  13
  14 #include <sys/stat.h>
  15 #include <sys/types.h>
  16 #include <sys/mount.h>
  17
  18 #include <asm/byteorder.h>
  19
  20 #include <errno.h>
  21 #include <string.h>
  22 #include <stdio.h>
  23 #include <unistd.h>
  24 #include <stdlib.h>
  25 #include <glob.h>
  26 #include <errno.h>
  27 #include <dirent.h>
  28 #include <fcntl.h>
  29
  30 #include "libfstools.h"
  31 #include "volume.h"
  32
  33 #define SWITCH_JFFS2 "/tmp/.switch_jffs2"
  34
  35 void
  36 foreachdir(const char *dir, int (*cb)(const char*))
  37 {
  38         char globdir[256];
  39         glob_t gl;
  40         int j;
  41
  42         if (dir[strlen(dir) - 1] == '/')
  43                 snprintf(globdir, 256, "%s*", dir);
  44         else
  45                 snprintf(globdir, 256, "%s/*", dir);
  46
  47         if (!glob(globdir, GLOB_NOESCAPE | GLOB_MARK | GLOB_ONLYDIR, NULL, &gl))
  48                 for (j = 0; j < gl.gl_pathc; j++)
  49                         foreachdir(gl.gl_pathv[j], cb);
  50
  51         cb(dir);
  52 }
  53
  54 static int
  55 overlay_mount(struct volume *v, char *fs)
  56 {
  57         if (mkdir("/tmp/overlay", 0755)) {
  58                 fprintf(stderr, "failed to mkdir /tmp/overlay: %s\n", strerror(errno));
  59                 return -1;
  60         }
  61
  62         if (mount(v->blk, "/tmp/overlay", fs, MS_NOATIME, NULL)) {
  63                 fprintf(stderr, "failed to mount -t %s %s /tmp/overlay: %s\n", fs, v->blk, strerror(errno));
  64                 return -1;
  65         }
  66
  67         return volume_init(v);
  68 }
  69
  70 static int
  71 switch2jffs(struct volume *v)
  72 {
  73         struct stat s;
  74         int ret;
  75
  76         if (!stat(SWITCH_JFFS2, &s)) {
  77                 fprintf(stderr, "jffs2 switch already running\n");
  78                 return -1;
  79         }
  80
  81         creat("/tmp/.switch_jffs2", 0600);
  82         ret = mount(v->blk, "/rom/overlay", "jffs2", MS_NOATIME, NULL);
  83         unlink("/tmp/.switch_jffs2");
  84         if (ret) {
  85                 fprintf(stderr, "failed - mount -t jffs2 %s /rom/overlay: %s\n", v->blk, strerror(errno));
  86                 return -1;
  87         }
  88
  89         if (mount("none", "/", NULL, MS_NOATIME | MS_REMOUNT, 0)) {
  90                 fprintf(stderr, "failed - mount -o remount,ro none: %s\n", strerror(errno));
  91                 return -1;
  92         }
  93
  94         system("cp -a /tmp/root/* /rom/overlay");
  95
  96         if (pivot("/rom", "/mnt")) {
  97                 fprintf(stderr, "failed - pivot /rom /mnt: %s\n", strerror(errno));
  98                 return -1;
  99         }
 100
 101         if (mount_move("/mnt", "/tmp/root", "")) {
 102                 fprintf(stderr, "failed - mount -o move /mnt /tmp/root %s\n", strerror(errno));
 103                 return -1;
 104         }
 105
 106         return fopivot("/overlay", "/rom");
 107 }
 108
 109 int
 110 handle_whiteout(const char *dir)
 111 {
 112         struct stat s;
 113         char link[256];
 114         ssize_t sz;
 115         struct dirent **namelist;
 116         int n;
 117
 118         n = scandir(dir, &namelist, NULL, NULL);
 119
 120         if (n < 1)
 121                 return -1;
 122
 123         while (n--) {
 124                 char file[256];
 125
 126                 snprintf(file, sizeof(file), "%s%s", dir, namelist[n]->d_name);
 127                 if (!lstat(file, &s) && S_ISLNK(s.st_mode)) {
 128                         sz = readlink(file, link, sizeof(link) - 1);
 129                         if (sz > 0) {
 130                                 char *orig;
 131
 132                                 link[sz] = '\0';
 133                                 orig = strstr(&file[1], "/");
 134                                 if (orig && !strcmp(link, "(overlay-whiteout)"))
 135                                         unlink(orig);
 136                         }
 137                 }
 138                 free(namelist[n]);
 139         }
 140         free(namelist);
 141
 142         return 0;
 143 }
 144
 145 int
 146 jffs2_switch(int argc, char **argv)
 147 {
 148         struct volume *v;
 149         char *mp;
 150         int ret = -1;
 151
 152         if (find_overlay_mount("overlayfs:/tmp/root"))
 153                 return -1;
 154
 155         if (find_filesystem("overlay")) {
 156                 fprintf(stderr, "overlayfs not found\n");
 157                 return ret;
 158         }
 159
 160         v = volume_find("rootfs_data");
 161         mp = find_mount_point(v->blk, NULL);
 162         if (mp) {
 163                 fprintf(stderr, "rootfs_data:%s is already mounted as %s\n", v->blk, mp);
 164                 return -1;
 165         }
 166
 167         switch (volume_identify(v)) {
 168         case FS_NONE:
 169                 fprintf(stderr, "no jffs2 marker found\n");
 170                 /* fall through */
 171
 172         case FS_DEADCODE:
 173                 ret = switch2jffs(v);
 174                 if (!ret) {
 175                         fprintf(stderr, "doing fo cleanup\n");
 176                         umount2("/tmp/root", MNT_DETACH);
 177                         foreachdir("/overlay/", handle_whiteout);
 178                 }
 179                 break;
 180
 181         case FS_JFFS2:
 182                 ret = overlay_mount(v, "jffs2");
 183                 if (ret)
 184                         break;
 185                 if (mount_move("/tmp", "", "/overlay") || fopivot("/overlay", "/rom")) {
 186                         fprintf(stderr, "switching to jffs2 failed\n");
 187                         ret = -1;
 188                 }
 189                 break;
 190
 191         case FS_UBIFS:
 192                 ret = overlay_mount(v, "ubifs");
 193                 if (ret)
 194                         break;
 195                 if (mount_move("/tmp", "", "/overlay") || fopivot("/overlay", "/rom")) {
 196                         fprintf(stderr, "switching to ubifs failed\n");
 197                         ret = -1;
 198                 }
 199                 break;
 200         }
 201         return ret;
 202 }
 203
 204 static int overlay_mount_fs(void)
 205 {
 206         struct volume *v;
 207         char *fstype;
 208
 209         if (mkdir("/tmp/overlay", 0755)) {
 210                 fprintf(stderr, "failed to mkdir /tmp/overlay: %s\n", strerror(errno));
 211                 return -1;
 212         }
 213
 214         v = volume_find("rootfs_data");
 215         if (!v) {
 216                 fprintf(stderr, "rootfs_data does not exist\n");
 217                 return -1;
 218         }
 219
 220         fstype = "jffs2";
 221
 222         switch (volume_identify(v)) {
 223         case FS_UBIFS:
 224                 fstype = "ubifs";
 225                 break;
 226         }
 227
 228         if (mount(v->blk, "/tmp/overlay", fstype, MS_NOATIME, NULL)) {
 229                 fprintf(stderr, "failed to mount -t %s %s /tmp/overlay: %s\n",
 230                                 fstype, v->blk, strerror(errno));
 231                 return -1;
 232         }
 233
 234         volume_init(v);
 235
 236         return -1;
 237 }
 238
 239 int mount_overlay(void)
 240 {
 241         struct volume *v = volume_find("rootfs_data");;
 242         char *mp;
 243
 244         if (!v)
 245                 return -1;
 246
 247         mp = find_mount_point(v->blk, NULL);
 248         if (mp) {
 249                 fprintf(stderr, "rootfs_data:%s is already mounted as %s\n", v->blk, mp);
 250                 return -1;
 251         }
 252
 253         overlay_mount_fs();
 254
 255         extroot_prefix = "/tmp/overlay";
 256         if (!mount_extroot()) {
 257                 fprintf(stderr, "switched to extroot\n");
 258                 return 0;
 259         }
 260
 261         fprintf(stderr, "switching to overlay\n");
 262         if (mount_move("/tmp", "", "/overlay") || fopivot("/overlay", "/rom")) {
 263                 fprintf(stderr, "switching to jffs2 failed - fallback to ramoverlay\n");
 264                 return ramoverlay();
 265         }
 266
 267         return -1;
 268 }