Magisk/jni/magiskboot/cpio.c

508 lines
13 KiB
C
Raw Normal View History

2017-09-14 17:11:56 +02:00
#include <stdio.h>
#include <unistd.h>
2017-03-07 17:54:23 +01:00
#include "magiskboot.h"
#include "cpio.h"
2017-09-14 17:11:56 +02:00
#include "logging.h"
#include "utils.h"
2017-03-07 17:54:23 +01:00
static uint32_t x8u(char *hex) {
uint32_t val, inpos = 8, outpos;
char pattern[6];
while (*hex == '0') {
hex++;
if (!--inpos) return 0;
}
// Because scanf gratuitously treats %*X differently than printf does.
sprintf(pattern, "%%%dx%%n", inpos);
sscanf(hex, pattern, &val, &outpos);
2017-09-14 17:11:56 +02:00
if (inpos != outpos) LOGE("bad cpio header\n");
2017-03-07 17:54:23 +01:00
return val;
}
2017-09-14 04:47:10 +02:00
static void cpio_free(cpio_entry *f) {
2017-03-10 00:52:59 +01:00
if (f) {
free(f->filename);
free(f->data);
free(f);
}
}
2017-09-14 04:47:10 +02:00
static void cpio_vec_insert(struct vector *v, cpio_entry *n) {
cpio_entry *f;
2017-03-07 17:54:23 +01:00
vec_for_each(v, f) {
if (strcmp(f->filename, n->filename) == 0) {
// Replace, then all is done
2017-03-10 00:52:59 +01:00
cpio_free(f);
2017-09-07 13:22:30 +02:00
vec_cur(v) = n;
2017-03-07 17:54:23 +01:00
return;
}
}
2017-09-07 13:22:30 +02:00
vec_push_back(v, n);
2017-03-07 17:54:23 +01:00
}
2017-09-09 17:05:50 +02:00
static int cpio_cmp(const void *a, const void *b) {
2017-09-14 04:47:10 +02:00
return strcmp((*(cpio_entry **) a)->filename, (*(cpio_entry **) b)->filename);
2017-03-09 21:08:17 +01:00
}
2017-09-14 04:47:10 +02:00
// Parse cpio file to a vector of cpio_entry
2017-04-27 21:15:48 +02:00
static void parse_cpio(const char *filename, struct vector *v) {
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Loading cpio: [%s]\n\n", filename);
2017-04-28 15:48:38 +02:00
int fd = xopen(filename, O_RDONLY);
2017-03-07 17:54:23 +01:00
cpio_newc_header header;
2017-09-14 04:47:10 +02:00
cpio_entry *f;
2017-09-07 13:22:30 +02:00
while(xxread(fd, &header, 110) != -1) {
2017-04-28 15:48:38 +02:00
f = xcalloc(sizeof(*f), 1);
2017-03-07 17:54:23 +01:00
// f->ino = x8u(header.ino);
f->mode = x8u(header.mode);
f->uid = x8u(header.uid);
f->gid = x8u(header.gid);
// f->nlink = x8u(header.nlink);
// f->mtime = x8u(header.mtime);
f->filesize = x8u(header.filesize);
// f->devmajor = x8u(header.devmajor);
// f->devminor = x8u(header.devminor);
// f->rdevmajor = x8u(header.rdevmajor);
// f->rdevminor = x8u(header.rdevminor);
f->namesize = x8u(header.namesize);
// f->check = x8u(header.check);
2017-09-07 13:22:30 +02:00
f->filename = xmalloc(f->namesize);
2017-04-28 15:48:38 +02:00
xxread(fd, f->filename, f->namesize);
2017-03-07 17:54:23 +01:00
file_align(fd, 4, 0);
2017-03-15 23:46:19 +01:00
if (strcmp(f->filename, ".") == 0 || strcmp(f->filename, "..") == 0) {
2017-03-10 00:52:59 +01:00
cpio_free(f);
continue;
2017-03-09 21:08:17 +01:00
}
2017-03-15 23:46:19 +01:00
if (strcmp(f->filename, "TRAILER!!!") == 0) {
cpio_free(f);
break;
}
2017-03-07 17:54:23 +01:00
if (f->filesize) {
f->data = malloc(f->filesize);
2017-04-28 15:48:38 +02:00
xxread(fd, f->data, f->filesize);
2017-03-07 17:54:23 +01:00
file_align(fd, 4, 0);
}
vec_push_back(v, f);
}
close(fd);
}
2017-04-27 21:15:48 +02:00
static void dump_cpio(const char *filename, struct vector *v) {
2017-07-18 05:53:28 +02:00
fprintf(stderr, "\nDump cpio: [%s]\n\n", filename);
2017-03-07 17:54:23 +01:00
int fd = open_new(filename);
unsigned inode = 300000;
char header[111];
2017-09-07 13:22:30 +02:00
// Sort by name
2017-09-09 17:05:50 +02:00
vec_sort(v, cpio_cmp);
2017-09-14 04:47:10 +02:00
cpio_entry *f;
2017-03-07 17:54:23 +01:00
vec_for_each(v, f) {
if (f->remove) continue;
sprintf(header, "070701%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
inode++, // f->ino
f->mode,
f->uid,
f->gid,
1, // f->nlink
0, // f->mtime
f->filesize,
0, // f->devmajor
0, // f->devminor
0, // f->rdevmajor
0, // f->rdevminor
f->namesize,
0 // f->check
);
2017-04-28 15:48:38 +02:00
xwrite(fd, header, 110);
xwrite(fd, f->filename, f->namesize);
2017-03-07 17:54:23 +01:00
file_align(fd, 4, 1);
if (f->filesize) {
2017-04-28 15:48:38 +02:00
xwrite(fd, f->data, f->filesize);
2017-03-07 17:54:23 +01:00
file_align(fd, 4, 1);
}
}
2017-03-09 21:08:17 +01:00
// Write trailer
sprintf(header, "070701%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x", inode++, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 11, 0);
2017-04-28 15:48:38 +02:00
xwrite(fd, header, 110);
xwrite(fd, "TRAILER!!!\0", 11);
2017-03-09 21:08:17 +01:00
file_align(fd, 4, 1);
2017-03-10 00:52:59 +01:00
close(fd);
2017-03-07 17:54:23 +01:00
}
2017-04-27 21:15:48 +02:00
static void cpio_vec_destroy(struct vector *v) {
2017-09-14 04:47:10 +02:00
// Free each cpio_entry
cpio_entry *f;
2017-03-07 17:54:23 +01:00
vec_for_each(v, f) {
2017-03-10 00:52:59 +01:00
cpio_free(f);
2017-03-07 17:54:23 +01:00
}
vec_destroy(v);
}
2017-04-27 21:15:48 +02:00
static void cpio_rm(int recursive, const char *entry, struct vector *v) {
2017-09-14 04:47:10 +02:00
cpio_entry *f;
2017-03-07 17:54:23 +01:00
vec_for_each(v, f) {
2017-09-09 17:05:50 +02:00
if (strncmp(f->filename, entry, strlen(entry)) == 0) {
char next = f->filename[strlen(entry)];
if ((recursive && next == '/') || next == '\0') {
if (!f->remove) {
fprintf(stderr, "Remove [%s]\n", f->filename);
f->remove = 1;
}
if (!recursive) return;
2017-03-10 00:52:59 +01:00
}
2017-03-07 17:54:23 +01:00
}
}
}
2017-04-27 21:15:48 +02:00
static void cpio_mkdir(mode_t mode, const char *entry, struct vector *v) {
2017-09-14 04:47:10 +02:00
cpio_entry *f = xcalloc(sizeof(*f), 1);
2017-03-07 17:54:23 +01:00
f->mode = S_IFDIR | mode;
f->namesize = strlen(entry) + 1;
2017-09-07 13:22:30 +02:00
f->filename = strdup(entry);
2017-03-07 17:54:23 +01:00
cpio_vec_insert(v, f);
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Create directory [%s] (%04o)\n",entry, mode);
2017-03-07 17:54:23 +01:00
}
2017-04-27 21:15:48 +02:00
static void cpio_add(mode_t mode, const char *entry, const char *filename, struct vector *v) {
2017-04-28 15:48:38 +02:00
int fd = xopen(filename, O_RDONLY);
2017-09-14 04:47:10 +02:00
cpio_entry *f = xcalloc(sizeof(*f), 1);
2017-03-07 17:54:23 +01:00
f->mode = S_IFREG | mode;
f->namesize = strlen(entry) + 1;
2017-09-07 13:22:30 +02:00
f->filename = strdup(entry);
2017-03-07 17:54:23 +01:00
f->filesize = lseek(fd, 0, SEEK_END);
lseek(fd, 0, SEEK_SET);
2017-09-07 13:22:30 +02:00
f->data = xmalloc(f->filesize);
2017-04-28 15:48:38 +02:00
xxread(fd, f->data, f->filesize);
2017-03-10 00:52:59 +01:00
close(fd);
2017-03-07 17:54:23 +01:00
cpio_vec_insert(v, f);
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Add entry [%s] (%04o)\n", entry, mode);
2017-03-07 17:54:23 +01:00
}
2017-03-09 21:08:17 +01:00
2017-04-27 21:15:48 +02:00
static void cpio_test(struct vector *v) {
2017-09-12 09:27:28 +02:00
#define STOCK_BOOT 0x0
#define MAGISK_PATCH 0x1
#define OTHER_PATCH 0x2
int ret = STOCK_BOOT;
2017-09-14 04:47:10 +02:00
cpio_entry *f;
2017-09-12 09:27:28 +02:00
const char *OTHER_LIST[] = { "sbin/launch_daemonsu.sh", "sbin/su", "init.xposed.rc", "boot/sbin/launch_daemonsu.sh", NULL };
const char *MAGISK_LIST[] = { "init.magisk.rc", "overlay/init.magisk.rc", NULL };
2017-03-09 21:08:17 +01:00
vec_for_each(v, f) {
2017-06-02 23:08:52 +02:00
for (int i = 0; OTHER_LIST[i]; ++i) {
2017-09-12 09:27:28 +02:00
if (strcmp(f->filename, OTHER_LIST[i]) == 0) {
2017-06-02 23:08:52 +02:00
ret |= OTHER_PATCH;
2017-09-12 09:27:28 +02:00
// Already find other files, abort
exit(OTHER_PATCH);
}
}
for (int i = 0; MAGISK_LIST[i]; ++i) {
if (strcmp(f->filename, MAGISK_LIST[i]) == 0)
ret = MAGISK_PATCH;
2017-03-09 21:08:17 +01:00
}
}
cpio_vec_destroy(v);
2017-09-12 09:27:28 +02:00
exit(ret);
2017-03-09 21:08:17 +01:00
}
2017-07-02 15:36:09 +02:00
static void cpio_patch(struct vector *v, int keepverity, int keepforceencrypt) {
2017-09-14 04:47:10 +02:00
cpio_entry *f;
2017-09-25 07:44:00 +02:00
int skip, write;
2017-03-09 21:08:17 +01:00
vec_for_each(v, f) {
2017-07-02 15:36:09 +02:00
if (strcmp(f->filename, "init.rc") == 0) {
2017-09-14 19:45:39 +02:00
void *new_data = patch_init_rc(f->data, &f->filesize);
2017-07-02 15:36:09 +02:00
free(f->data);
2017-09-14 19:45:39 +02:00
f->data = new_data;
2017-07-02 15:36:09 +02:00
} else {
if (!keepverity) {
if (strstr(f->filename, "fstab") != NULL && S_ISREG(f->mode)) {
2017-09-25 07:44:00 +02:00
write = 0;
for (int read = 0; read < f->filesize; ++write, ++read) {
if ((skip = check_verity_pattern(f->data + read)) > 0) {
fprintf(stderr, "Remove pattern [%.*s] in [%s]\n", skip, f->data + read, f->filename);
read += skip;
2017-07-02 15:36:09 +02:00
}
2017-09-25 07:44:00 +02:00
f->data[write] = f->data[read];
2017-07-02 15:36:09 +02:00
}
2017-09-25 07:44:00 +02:00
f->filesize = write;
2017-07-02 15:36:09 +02:00
} else if (strcmp(f->filename, "verity_key") == 0) {
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Remove [verity_key]\n");
2017-07-02 15:36:09 +02:00
f->remove = 1;
}
}
if (!keepforceencrypt) {
if (strstr(f->filename, "fstab") != NULL && S_ISREG(f->mode)) {
2017-09-25 07:44:00 +02:00
write = 0;
for (int read = 0; read < f->filesize; ++write, ++read) {
if ((skip = check_encryption_pattern(f->data + read)) > 0) {
2017-09-14 19:45:39 +02:00
// assert(skip > 11)!
2017-09-25 07:44:00 +02:00
fprintf(stderr, "Replace pattern [%.*s] with [encryptable] in [%s]\n", skip, f->data + read, f->filename);
memcpy(f->data + write, "encryptable", 11);
write += 11;
read += skip;
2017-07-02 15:36:09 +02:00
}
2017-09-25 07:44:00 +02:00
f->data[write] = f->data[read];
2017-03-09 21:08:17 +01:00
}
2017-09-25 07:44:00 +02:00
f->filesize = write;
2017-03-09 21:08:17 +01:00
}
}
}
}
}
2017-04-27 21:15:48 +02:00
static void cpio_extract(const char *entry, const char *filename, struct vector *v) {
2017-09-14 04:47:10 +02:00
cpio_entry *f;
2017-03-09 21:08:17 +01:00
vec_for_each(v, f) {
if (strcmp(f->filename, entry) == 0 && S_ISREG(f->mode)) {
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Extracting [%s] to [%s]\n\n", entry, filename);
2017-03-09 21:08:17 +01:00
int fd = open_new(filename);
2017-04-28 15:48:38 +02:00
xwrite(fd, f->data, f->filesize);
2017-03-09 21:08:17 +01:00
fchmod(fd, f->mode);
fchown(fd, f->uid, f->gid);
close(fd);
exit(0);
2017-03-09 21:08:17 +01:00
}
}
2017-09-14 17:11:56 +02:00
LOGE("Cannot find the file entry [%s]\n", entry);
2017-03-09 21:08:17 +01:00
}
2017-04-27 21:15:48 +02:00
static void cpio_backup(const char *orig, struct vector *v) {
struct vector o_body, *o = &o_body, bak;
2017-09-14 04:47:10 +02:00
cpio_entry *m, *n, *dir, *rem;
2017-04-30 19:58:52 +02:00
char buf[PATH_MAX];
2017-03-10 00:52:59 +01:00
int res, doBak;
2017-04-28 15:48:38 +02:00
dir = xcalloc(sizeof(*dir), 1);
rem = xcalloc(sizeof(*rem), 1);
2017-03-10 00:52:59 +01:00
vec_init(o);
vec_init(&bak);
// First push back the directory and the rmlist
vec_push_back(&bak, dir);
vec_push_back(&bak, rem);
parse_cpio(orig, o);
// Remove possible backups in original ramdisk
cpio_rm(1, ".backup", o);
cpio_rm(1, ".backup", v);
2017-09-07 13:22:30 +02:00
// Sort both vectors before comparing
2017-09-09 17:05:50 +02:00
vec_sort(v, cpio_cmp);
vec_sort(o, cpio_cmp);
2017-09-07 13:22:30 +02:00
2017-03-10 00:52:59 +01:00
// Init the directory and rmlist
dir->filename = strdup(".backup");
dir->namesize = strlen(dir->filename) + 1;
dir->mode = S_IFDIR;
rem->filename = strdup(".backup/.rmlist");
rem->namesize = strlen(rem->filename) + 1;
rem->mode = S_IFREG;
// Start comparing
size_t i = 0, j = 0;
while(i != vec_size(o) || j != vec_size(v)) {
doBak = 0;
if (i != vec_size(o) && j != vec_size(v)) {
m = vec_entry(o)[i];
n = vec_entry(v)[j];
res = strcmp(m->filename, n->filename);
} else if (i == vec_size(o)) {
n = vec_entry(v)[j];
res = 1;
} else if (j == vec_size(v)) {
m = vec_entry(o)[i];
res = -1;
}
if (res < 0) {
// Something is missing in new ramdisk, backup!
++i;
doBak = 1;
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Backup missing entry: ");
2017-03-10 00:52:59 +01:00
} else if (res == 0) {
++i; ++j;
2017-03-15 23:46:19 +01:00
if (m->filesize == n->filesize && memcmp(m->data, n->data, m->filesize) == 0)
continue;
// Not the same!
doBak = 1;
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Backup mismatch entry: ");
2017-03-10 00:52:59 +01:00
} else {
// Someting new in ramdisk, record in rem
++j;
if (n->remove) continue;
2017-04-28 15:48:38 +02:00
rem->data = xrealloc(rem->data, rem->filesize + n->namesize);
2017-03-10 00:52:59 +01:00
memcpy(rem->data + rem->filesize, n->filename, n->namesize);
rem->filesize += n->namesize;
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Record new entry: [%s] -> [.backup/.rmlist]\n", n->filename);
2017-03-10 00:52:59 +01:00
}
if (doBak) {
m->namesize += 8;
m->filename = realloc(m->filename, m->namesize);
strcpy(buf, m->filename);
sprintf(m->filename, ".backup/%s", buf);
2017-07-18 05:53:28 +02:00
fprintf(stderr, "[%s] -> [%s]\n", buf, m->filename);
2017-03-10 00:52:59 +01:00
vec_push_back(&bak, m);
// NULL the original entry, so it won't be freed
vec_entry(o)[i - 1] = NULL;
}
}
// Add the backup files to the original ramdisk
vec_for_each(&bak, m) {
vec_push_back(v, m);
}
// Don't include if empty
if (rem->filesize == 0) {
rem->remove = 1;
if (bak.size == 2)
dir->remove = 1;
}
// Cleanup
cpio_vec_destroy(o);
}
2017-04-27 21:15:48 +02:00
static int cpio_restore(struct vector *v) {
2017-09-14 04:47:10 +02:00
cpio_entry *f, *n;
int ret = 1;
2017-03-10 00:52:59 +01:00
vec_for_each(v, f) {
if (strstr(f->filename, ".backup") != NULL) {
ret = 0;
2017-03-10 00:52:59 +01:00
f->remove = 1;
if (strcmp(f->filename, ".backup") == 0) continue;
if (strcmp(f->filename, ".backup/.rmlist") == 0) {
for (int pos = 0; pos < f->filesize; pos += strlen(f->data + pos) + 1)
2017-03-10 00:52:59 +01:00
cpio_rm(0, f->data + pos, v);
continue;
}
2017-04-28 15:48:38 +02:00
n = xcalloc(sizeof(*n), 1);
2017-03-10 00:52:59 +01:00
memcpy(n, f, sizeof(*f));
n->namesize -= 8;
2017-09-07 13:22:30 +02:00
n->filename = strdup(f->filename + 8);
n->data = f->data;
f->data = NULL;
2017-03-10 00:52:59 +01:00
n->remove = 0;
2017-07-18 05:53:28 +02:00
fprintf(stderr, "Restoring [%s] -> [%s]\n", f->filename, n->filename);
2017-03-10 00:52:59 +01:00
cpio_vec_insert(v, n);
}
}
// Some known stuff we can remove
cpio_rm(0, "sbin/magic_mask.sh", v);
cpio_rm(0, "init.magisk.rc", v);
cpio_rm(0, "magisk", v);
return ret;
2017-03-10 00:52:59 +01:00
}
static void cpio_stocksha1(struct vector *v) {
2017-09-14 04:47:10 +02:00
cpio_entry *f;
char sha1[41];
vec_for_each(v, f) {
2017-09-15 12:03:56 +02:00
if (strcmp(f->filename, "init.magisk.rc") == 0
|| strcmp(f->filename, "overlay/init.magisk.rc") == 0) {
for (char *pos = f->data; pos < f->data + f->filesize; pos = strchr(pos + 1, '\n') + 1) {
if (memcmp(pos, "# STOCKSHA1=", 12) == 0) {
pos += 12;
memcpy(sha1, pos, 40);
sha1[40] = '\0';
printf("%s\n", sha1);
return;
}
}
}
}
}
2017-09-09 17:05:50 +02:00
static void cpio_mv(struct vector *v, const char *from, const char *to) {
2017-09-14 04:47:10 +02:00
struct cpio_entry *f, *t;
2017-09-09 17:05:50 +02:00
vec_for_each(v, f) {
if (strcmp(f->filename, from) == 0) {
fprintf(stderr, "Move [%s] -> [%s]\n", from, to);
vec_for_each(v, t) {
if (strcmp(t->filename, to) == 0) {
t->remove = 1;
break;
}
}
free(f->filename);
f->namesize = strlen(to) + 1;
f->filename = strdup(to);
return;
}
}
fprintf(stderr, "Cannot find entry %s\n", from);
exit(1);
}
2017-03-09 21:08:17 +01:00
int cpio_commands(const char *command, int argc, char *argv[]) {
int recursive = 0, ret = 0;
2017-03-09 21:08:17 +01:00
command_t cmd;
char *incpio = argv[0];
++argv;
--argc;
if (strcmp(command, "test") == 0) {
cmd = TEST;
2017-03-10 00:52:59 +01:00
} else if (strcmp(command, "restore") == 0) {
cmd = RESTORE;
} else if (strcmp(command, "stocksha1") == 0) {
cmd = STOCKSHA1;
2017-03-10 00:52:59 +01:00
} else if (argc == 1 && strcmp(command, "backup") == 0) {
cmd = BACKUP;
2017-03-09 21:08:17 +01:00
} else if (argc > 0 && strcmp(command, "rm") == 0) {
cmd = RM;
if (argc == 2 && strcmp(argv[0], "-r") == 0) {
recursive = 1;
++argv;
--argc;
}
2017-09-09 17:05:50 +02:00
} else if (argc == 2 && strcmp(command, "mv") == 0) {
cmd = MV;
2017-07-02 15:36:09 +02:00
} else if (argc == 2 && strcmp(command, "patch") == 0) {
cmd = PATCH;
2017-03-10 00:52:59 +01:00
} else if (argc == 2 && strcmp(command, "extract") == 0) {
cmd = EXTRACT;
2017-03-09 21:08:17 +01:00
} else if (argc == 2 && strcmp(command, "mkdir") == 0) {
cmd = MKDIR;
} else if (argc == 3 && strcmp(command, "add") == 0) {
cmd = ADD;
} else {
cmd = NONE;
}
2017-04-27 21:15:48 +02:00
struct vector v;
2017-03-09 21:08:17 +01:00
vec_init(&v);
parse_cpio(incpio, &v);
switch(cmd) {
2017-07-02 15:36:09 +02:00
case TEST:
cpio_test(&v);
break;
case RESTORE:
ret = cpio_restore(&v);
break;
case STOCKSHA1:
cpio_stocksha1(&v);
return 0;
2017-07-02 15:36:09 +02:00
case BACKUP:
cpio_backup(argv[0], &v);
case RM:
cpio_rm(recursive, argv[0], &v);
break;
case PATCH:
cpio_patch(&v, strcmp(argv[0], "true") == 0, strcmp(argv[1], "true") == 0);
break;
case EXTRACT:
cpio_extract(argv[0], argv[1], &v);
break;
case MKDIR:
cpio_mkdir(strtoul(argv[0], NULL, 8), argv[1], &v);
break;
case ADD:
cpio_add(strtoul(argv[0], NULL, 8), argv[1], argv[2], &v);
break;
2017-09-09 17:05:50 +02:00
case MV:
cpio_mv(&v, argv[0], argv[1]);
break;
2017-07-02 15:36:09 +02:00
case NONE:
return 1;
2017-03-09 21:08:17 +01:00
}
dump_cpio(incpio, &v);
cpio_vec_destroy(&v);
exit(ret);
2017-03-09 21:08:17 +01:00
}