2 * Copyright (C) 2014 John Crispin <blogic@openwrt.org>
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
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.
15 #include <sys/types.h>
16 #include <sys/mount.h>
18 #include <asm/byteorder.h>
30 #include "libfstools.h"
34 #define GLOB_ONLYDIR 0x100
37 #define SWITCH_JFFS2 "/tmp/.switch_jffs2"
39 static bool keep_sysupgrade
;
42 handle_rmdir(const char *dir
)
55 while ((dt
= readdir(d
)) != NULL
) {
56 if (fstatat(fd
, dt
->d_name
, &st
, AT_SYMLINK_NOFOLLOW
) || S_ISDIR(st
.st_mode
))
59 if (keep_sysupgrade
&& !strcmp(dt
->d_name
, "sysupgrade.tgz"))
62 unlinkat(fd
, dt
->d_name
, 0);
72 foreachdir(const char *dir
, int (*cb
)(const char*))
74 static char *globdir
= NULL
;
75 static size_t globdirlen
= 0;
76 struct stat s
= { 0 };
77 size_t dirlen
= strlen(dir
);
81 if (dirlen
+ sizeof("/*") > globdirlen
) {
82 /* Alloc extra 256 B to avoid too many reallocs */
83 size_t len
= dirlen
+ sizeof("/*") + 256;
86 tmp
= realloc(globdir
, len
);
93 sprintf(globdir
, "%s/*", dir
);
95 /* Include GLOB_MARK as callbacks expect a trailing slash */
96 if (!glob(globdir
, GLOB_NOESCAPE
| GLOB_MARK
| GLOB_ONLYDIR
, NULL
, &gl
))
97 for (j
= 0; j
< gl
.gl_pathc
; j
++) {
98 char *dir
= gl
.gl_pathv
[j
];
99 int len
= strlen(gl
.gl_pathv
[j
]);
102 /* Quick way of skipping files */
103 if (dir
[len
- 1] != '/')
106 /* lstat needs path without a trailing slash */
109 err
= lstat(gl
.gl_pathv
[j
], &s
);
113 if (!err
&& !S_ISLNK(s
.st_mode
))
114 foreachdir(gl
.gl_pathv
[j
], cb
);
119 static void foreach_mount(int (*cb
)(const char *, const char *))
121 FILE *fp
= fopen("/proc/mounts", "r");
122 static char line
[256];
127 while (fgets(line
, sizeof(line
), fp
)) {
128 char device
[32], mount_point
[32];
130 if (sscanf(line
, "%31s %31s %*s %*s %*u %*u", device
, mount_point
) == 2)
131 cb(device
, mount_point
);
138 overlay_delete(const char *dir
, bool _keep_sysupgrade
)
140 keep_sysupgrade
= _keep_sysupgrade
;
141 foreachdir(dir
, handle_rmdir
);
145 overlay_mount(struct volume
*v
, char *fs
)
147 if (mkdir("/tmp/overlay", 0755)) {
148 ULOG_ERR("failed to mkdir /tmp/overlay: %m\n");
152 if (mount(v
->blk
, "/tmp/overlay", fs
, MS_NOATIME
, NULL
)) {
153 ULOG_ERR("failed to mount -t %s %s /tmp/overlay: %m\n", fs
, v
->blk
);
161 * move_mount - move mount point to the new root
163 static int move_mount(const char *device
, const char *mount_point
)
165 static const char *prefix
= "/tmp/root/";
167 if (strncmp(mount_point
, prefix
, strlen(prefix
)))
170 return mount_move(prefix
, "/", mount_point
+ strlen(prefix
));
174 switch2jffs(struct volume
*v
)
179 if (!stat(SWITCH_JFFS2
, &s
)) {
180 ULOG_ERR("jffs2 switch already running\n");
184 creat("/tmp/.switch_jffs2", 0600);
185 ret
= mount(v
->blk
, "/rom/overlay", "jffs2", MS_NOATIME
, NULL
);
186 unlink("/tmp/.switch_jffs2");
188 ULOG_ERR("failed - mount -t jffs2 %s /rom/overlay: %m\n", v
->blk
);
192 if (mount("none", "/", NULL
, MS_NOATIME
| MS_REMOUNT
, 0)) {
193 ULOG_ERR("failed - mount -o remount,ro none: %m\n");
197 if (system("cp -a /tmp/root/* /rom/overlay")) {
198 ULOG_ERR("failed - cp -a /tmp/root/* /rom/overlay: %m\n");
202 if (pivot("/rom", "/mnt")) {
203 ULOG_ERR("failed - pivot /rom /mnt: %m\n");
207 if (mount_move("/mnt", "/tmp/root", "")) {
208 ULOG_ERR("failed - mount -o move /mnt /tmp/root %m\n");
212 ret
= fopivot("/overlay", "/rom");
215 * Besides copying overlay data from "tmpfs" to "jffs2" we should also
216 * move mount points that user could create during JFFS2 formatting.
217 * This has to happen after fopivot call because:
218 * 1) It's trivial to find mount points to move then (/tmp/root/...).
219 * 2) We can't do that earlier using /rom/overlay/upper/ as overlay(fs)
220 * doesn't support mounts. Mounting to upper dir don't make overlay
221 * /propagate/ files to the target dir.
223 foreach_mount(move_mount
);
229 handle_whiteout(const char *dir
)
234 struct dirent
**namelist
;
237 n
= scandir(dir
, &namelist
, NULL
, NULL
);
245 snprintf(file
, sizeof(file
), "%s%s", dir
, namelist
[n
]->d_name
);
246 if (!lstat(file
, &s
) && S_ISLNK(s
.st_mode
)) {
247 sz
= readlink(file
, link
, sizeof(link
) - 1);
252 orig
= strstr(&file
[1], "/");
253 if (orig
&& !strcmp(link
, "(overlay-whiteout)"))
264 static char *overlay_fs_name(int type
)
280 jffs2_switch(struct volume
*v
)
285 if (find_overlay_mount("overlayfs:/tmp/root"))
288 if (find_filesystem("overlay")) {
289 ULOG_ERR("overlayfs not supported by kernel\n");
294 mp
= find_mount_point(v
->blk
, 0);
296 ULOG_ERR("rootfs_data:%s is already mounted as %s\n", v
->blk
, mp
);
300 type
= volume_identify(v
);
301 fs_name
= overlay_fs_name(type
);
305 ULOG_ERR("no jffs2 marker found\n");
312 ULOG_INFO("performing overlay whiteout\n");
313 umount2("/tmp/root", MNT_DETACH
);
314 foreachdir("/overlay/", handle_whiteout
);
316 /* try hard to be in sync */
317 ULOG_INFO("syncronizing overlay\n");
318 if (system("cp -a /tmp/root/upper/* / 2>/dev/null"))
319 ULOG_ERR("failed to sync jffs2 overlay\n");
325 if (overlay_mount(v
, fs_name
))
327 if (mount_move("/tmp", "", "/overlay") || fopivot("/overlay", "/rom")) {
328 ULOG_ERR("switching to %s failed\n", fs_name
);
335 fs_state_set("/overlay", FS_STATE_READY
);
339 static int overlay_mount_fs(struct volume
*v
)
341 char *fstype
= overlay_fs_name(volume_identify(v
));
343 if (mkdir("/tmp/overlay", 0755)) {
344 ULOG_ERR("failed to mkdir /tmp/overlay: %m\n");
348 if (mount(v
->blk
, "/tmp/overlay", fstype
,
349 #ifdef OVL_MOUNT_FULL_ACCESS_TIME
354 #ifdef OVL_MOUNT_COMPRESS_ZLIB
360 ULOG_ERR("failed to mount -t %s %s /tmp/overlay: %m\n",
368 enum fs_state
fs_state_get(const char *dir
)
375 path
= alloca(strlen(dir
) + 1 + sizeof("/.fs_state"));
376 sprintf(path
, "%s/.fs_state", dir
);
377 len
= readlink(path
, valstr
, sizeof(valstr
) - 1);
379 return FS_STATE_UNKNOWN
;
384 if (val
> __FS_STATE_LAST
)
385 return FS_STATE_UNKNOWN
;
391 int fs_state_set(const char *dir
, enum fs_state state
)
396 if (fs_state_get(dir
) == state
)
399 path
= alloca(strlen(dir
) + 1 + sizeof("/.fs_state"));
400 sprintf(path
, "%s/.fs_state", dir
);
402 snprintf(valstr
, sizeof(valstr
), "%d", state
);
404 return symlink(valstr
, path
);
408 int mount_overlay(struct volume
*v
)
415 mp
= find_mount_point(v
->blk
, 0);
417 ULOG_ERR("rootfs_data:%s is already mounted as %s\n", v
->blk
, mp
);
423 extroot_prefix
= "/tmp/overlay";
424 if (!mount_extroot()) {
425 ULOG_INFO("switched to extroot\n");
429 switch(fs_state_get("/tmp/overlay")) {
430 case FS_STATE_UNKNOWN
:
431 fs_state_set("/tmp/overlay", FS_STATE_PENDING
);
432 if (fs_state_get("/tmp/overlay") != FS_STATE_PENDING
) {
433 ULOG_ERR("unable to set filesystem state\n");
436 case FS_STATE_PENDING
:
437 ULOG_INFO("overlay filesystem has not been fully initialized yet\n");
438 overlay_delete("/tmp/overlay", true);
444 fs_name
= overlay_fs_name(volume_identify(v
));
445 ULOG_INFO("switching to %s overlay\n", fs_name
);
446 if (mount_move("/tmp", "", "/overlay") || fopivot("/overlay", "/rom")) {
447 ULOG_ERR("switching to %s failed - fallback to ramoverlay\n", fs_name
);