summaryrefslogtreecommitdiff
path: root/src/user/bootstrap/tar.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/user/bootstrap/tar.c')
-rw-r--r--src/user/bootstrap/tar.c155
1 files changed, 0 insertions, 155 deletions
diff --git a/src/user/bootstrap/tar.c b/src/user/bootstrap/tar.c
deleted file mode 100644
index 2020fe0..0000000
--- a/src/user/bootstrap/tar.c
+++ /dev/null
@@ -1,155 +0,0 @@
-#include "tar.h"
-#include <camellia/flags.h>
-#include <camellia/fsutil.h>
-#include <camellia/syscalls.h>
-#include <stdint.h>
-#include <stdlib.h>
-#include <string.h>
-#include <camellia/compat.h>
-#include <camellia/fs/dir.h>
-
-#define BUF_SIZE 64
-
-static void *tar_open(const char *path, int len, void *base, size_t base_len);
-static char tar_type(void *meta);
-static void tar_dirbuild(struct dirbuild *db, const char *meta, void *base, size_t base_len);
-static void tar_read(struct ufs_request *res, void *base, size_t base_len);
-static int tar_size(void *sector);
-static int oct_parse(char *str, size_t len);
-
-
-static const char *root_fakemeta = ""; /* see comment in tar_open */
-
-
-void tar_driver(void *base) {
- static char buf[BUF_SIZE];
- struct ufs_request res;
- void *ptr;
- while (!c0_fs_wait(buf, BUF_SIZE, &res)) {
- switch (res.op) {
- case VFSOP_OPEN:
- ptr = tar_open(buf, res.len, base, ~0);
- c0_fs_respond(ptr, ptr ? 0 : -1, 0);
- break;
-
- case VFSOP_READ:
- tar_read(&res, base, ~0);
- break;
-
- case VFSOP_GETSIZE:
- if (tar_type(res.id) != '5') {
- c0_fs_respond(NULL, tar_size(res.id), 0);
- } else {
- struct dirbuild db;
- dir_start(&db, res.offset, NULL, 0);
- tar_dirbuild(&db, res.id, base, ~0);
- c0_fs_respond(NULL, dir_finish(&db), 0);
- }
- break;
-
- default:
- c0_fs_respond(NULL, -1, 0); // unsupported
- break;
- }
- }
- exit(0);
-}
-
-static char tar_type(void *meta) {
- if (meta == root_fakemeta) return '5';
- return *(char*)(meta + 156);
-}
-
-static void *tar_open(const char *path, int len, void *base, size_t base_len) {
- if (len <= 0) return NULL;
- path += 1; // skip the leading slash
- len -= 1;
-
- /* TAR archives don't (seem to) contain an entry for the root dir, so i'm
- * returning a fake one. this isn't a full entry because i'm currently too
- * lazy to create a full one - thus, it has to be special cased in tar_read */
- if (len == 0)
- return (void*)root_fakemeta;
-
- return tar_find(path, len, base, base_len);
-}
-
-static void tar_dirbuild(struct dirbuild *db, const char *meta, void *base, size_t base_len) {
- size_t meta_len = strlen(meta);
- for (size_t off = 0; off < base_len;) {
- if (0 != memcmp(base + off + 257, "ustar", 5))
- break; // not a metadata sector
-
- /* check if prefix matches */
- if (0 == memcmp(base + off, meta, meta_len)
- && *(char*)(base + off + meta_len) != '\0') {
- char *suffix = base + off + meta_len;
-
- /* check if the path contains any non-trailing slashes */
- char *slash = strchr(suffix, '/');
- if (!slash || slash[1] == '\0') {
- if (dir_append(db, suffix)) break;
- }
- }
-
- int size = tar_size(base + off);
- off += 512; // skip this metadata sector
- off += (size + 511) & ~511; // skip the data sectors
- }
-}
-
-static void tar_read(struct ufs_request *res, void *base, size_t base_len) {
- void *meta = (void*)res->id;
- static char buf[BUF_SIZE];
- // TODO reuse a single buffer for both tar_driver and tar_read
-
- switch (tar_type(meta)) {
- case '\0':
- case '0': /* normal files */
- fs_normslice(&res->offset, &res->len, tar_size(meta), false);
- c0_fs_respond(meta + 512 + res->offset, res->len, 0);
- break;
-
- case '5': /* directory */
- struct dirbuild db;
- dir_start(&db, res->offset, buf, sizeof buf);
- tar_dirbuild(&db, meta, base, base_len);
- c0_fs_respond(buf, dir_finish(&db), 0);
- break;
-
- default:
- c0_fs_respond(NULL, -1, 0);
- break;
- }
-}
-
-static int tar_size(void *sector) {
- return oct_parse(sector + 124, 11);
-}
-
-void *tar_find(const char *path, size_t path_len, void *base, size_t base_len) {
- int size;
- if (path_len > 100) return NULL; // illegal path
-
- for (size_t off = 0; off < base_len;) {
- if (0 != memcmp(base + off + 257, "ustar", 5))
- break; // not a metadata sector
- if (0 == memcmp(base + off, path, path_len) &&
- *(char*)(base + off + path_len) == '\0')
- return base + off; // file found, quit
-
- size = tar_size(base + off);
- off += 512; // skip this metadata sector
- off += (size + 511) & ~511; // skip the data sectors
- }
- return NULL;
-}
-
-static int oct_parse(char *str, size_t len) {
- int res = 0;
- for (size_t i = 0; i < len; i++) {
- res *= 8;
- res += str[i] - '0'; // no format checking
- }
- return res;
-}