1 files changed, 134 insertions, 0 deletions
diff --git a/package/cfgfs/src/ft_pack.c b/package/cfgfs/src/ft_pack.c
new file mode 100644
index 000000000..5d04f8b5c
--- /dev/null
+++ b/package/cfgfs/src/ft_pack.c
@@ -0,0 +1,134 @@
+/* $MirOS: contrib/hosted/fwcf/ft_pack.c,v 1.7 2006/09/23 23:21:04 tg Exp $ */
+
+/*-
+ * Copyright (c) 2006
+ *	Thorsten Glaser <tg@mirbsd.de>
+ *
+ * Licensee is hereby permitted to deal in this work without restric-
+ * tion, including unlimited rights to use, publicly perform, modify,
+ * merge, distribute, sell, give away or sublicence, provided all co-
+ * pyright notices above, these terms and the disclaimer are retained
+ * in all redistributions or reproduced in accompanying documentation
+ * or other materials provided with binary redistributions.
+ *
+ * Licensor offers the work "AS IS" and WITHOUT WARRANTY of any kind,
+ * express, or implied, to the maximum extent permitted by applicable
+ * law, without malicious intent or gross negligence; in no event may
+ * licensor, an author or contributor be held liable for any indirect
+ * or other damage, or direct damage except proven a consequence of a
+ * direct error of said person and intended use of this work, loss or
+ * other issues arising in any way out of its use, even if advised of
+ * the possibility of such damage or existence of a defect.
+ */
+
+#include <sys/param.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+
+#include "defs.h"
+#include "fts_subs.h"
+#include "pack.h"
+
+__RCSID("$MirOS: contrib/hosted/fwcf/ft_pack.c,v 1.7 2006/09/23 23:21:04 tg Exp $");
+
+char *
+ft_pack(ftsf_entry *e)
+{
+	char f_header[4096], *hdrptr = f_header;
+	size_t hdrleft = sizeof (f_header), k;
+	char *f_data = NULL, *rv;
+	off_t e_size;
+
+	if (e == NULL)
+		return (NULL);
+	if ((e->etype != FTSF_FILE) && (e->etype != FTSF_SYMLINK) &&
+	    (e->etype != FTSF_DIR))
+		return (NULL);
+
+	e_size = e->statp->st_size;
+
+	if ((k = strlcpy(hdrptr, e->pathname, hdrleft)) >= hdrleft)
+		return (NULL);
+	hdrptr += ++k;
+	hdrleft -= k;
+
+	if (e->etype == FTSF_SYMLINK) {
+		STOREB(0x03);
+		e->statp->st_mtime = 0;
+		e->statp->st_mode = 0;
+	} else if (e->etype == FTSF_DIR) {
+		STOREB(0x05);
+		e_size = 0;
+	}
+
+	if (e->statp->st_mtime) {
+		STOREB(0x10);
+		STORED(e->statp->st_mtime);
+	}
+
+	if (e->statp->st_gid > 0xFF) {
+		STOREB('G');
+		STORED(e->statp->st_gid);
+	} else if (e->statp->st_gid) {
+		STOREB('g');
+		STOREB(e->statp->st_gid);
+	}
+
+	if (e->statp->st_mode > 0xFFFF) {
+		STOREB('M');
+		STORED(e->statp->st_mode);
+	} else if (e->statp->st_mode) {
+		STOREB('m');
+		STOREW(e->statp->st_mode);
+	}
+
+	if (e->statp->st_uid > 0xFF) {
+		STOREB('U');
+		STORED(e->statp->st_uid);
+	} else if (e->statp->st_uid) {
+		STOREB('u');
+		STOREB(e->statp->st_uid);
+	}
+
+	/* e_size is zero for everything except files and symlinks */
+	if (e_size > 0xFF) {
+		STOREB('S');
+		STORET(e_size);
+	} else if (e_size) {
+		STOREB('s');
+		STOREB(e_size);
+	}
+
+	STOREB(0);
+
+	if (e_size) {
+		if ((f_data = malloc(e_size)) == NULL)
+			return (NULL);
+		if (asprintf(&rv, "%s/%s", ftsf_prefix, e->pathname) == -1)
+			return (NULL);
+		if (e->etype == FTSF_SYMLINK) {
+			if (readlink(rv, f_data, e_size) != e_size)
+				return (NULL);
+		} else {
+			int fd;
+
+			if ((fd = open(rv, O_RDONLY, 0)) < 0)
+				return (NULL);
+			if (read(fd, f_data, e_size) != e_size)
+				return (NULL);
+			close(fd);
+		}
+		free(rv);
+	}
+	k = sizeof (size_t) + (hdrptr - f_header) + e_size;
+	if ((rv = malloc(k)) == NULL)
+		return (NULL);
+	*(size_t *)rv = k;
+	memcpy(rv + sizeof (size_t), f_header, hdrptr - f_header);
+	memcpy(rv + sizeof (size_t) + (hdrptr - f_header), f_data, e_size);
+	return (rv);
+}