cpio/test/test_format_newc.c - third_party/libarchive - Git at Google

 /*-
  * Copyright (c) 2003-2007 Tim Kientzle
  * All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions
  * are met:
  * 1. Redistributions of source code must retain the above copyright
  *    notice, this list of conditions and the following disclaimer.
  * 2. Redistributions in binary form must reproduce the above copyright
  *    notice, this list of conditions and the following disclaimer in the
  *    documentation and/or other materials provided with the distribution.
  *
  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  */
 #include "test.h"
 __FBSDID("$FreeBSD: src/usr.bin/cpio/test/test_format_newc.c,v 1.2 2008/08/22 02:09:10 kientzle Exp $");

 /* Number of bytes needed to pad 'n' to multiple of 'block', assuming
  * that 'block' is a power of two. This trick can be more easily
  * remembered as -n & (block - 1), but many compilers quite reasonably
  * warn about "-n" when n is an unsigned value.  (~(n) + 1) is the
  * same thing, but written in a way that won't offend anyone. */
 #define PAD(n, block)  ((~(n) + 1) & ((block) - 1))

 static int
 is_hex(const char *p, size_t l)
 {
 	while (l > 0) {
 		if ((*p >= '0' && *p <= '9')
 		    || (*p >= 'a' && *p <= 'f')
 		    || (*p >= 'A' && *p <= 'F'))
 		{
 			--l;
 			++p;
 		} else
 			return (0);

 	}
 	return (1);
 }

 static int
 from_hex(const char *p, size_t l)
 {
 	int r = 0;

 	while (l > 0) {
 		r *= 16;
 		if (*p >= 'a' && *p <= 'f')
 			r += *p + 10 - 'a';
 		else if (*p >= 'A' && *p <= 'F')
 			r += *p + 10 - 'A';
 		else
 			r += *p - '0';
 		--l;
 		++p;
 	}
 	return (r);
 }

 #if !defined(_WIN32) || defined(__CYGWIN__)
 static int
 nlinks(const char *p)
 {
 	struct stat st;
 	assertEqualInt(0, stat(p, &st));
 	return st.st_nlink;
 }
 #endif

 DEFINE_TEST(test_format_newc)
 {
 	FILE *list;
 	int r;
 	int devmajor, devminor, ino, gid;
 	int uid = -1;
 	time_t t, t2, now;
 	char *p, *e;
 	size_t s, fs, ns;
 	char result[1024];

 	assertUmask(0);

 #if !defined(_WIN32)
 	uid = getuid();
 #endif

 	/*
 	 * Create an assortment of files.
 	 * TODO: Extend this to cover more filetypes.
 	 */
 	list = fopen("list", "w");

 	/* "file1" */
 	assertMakeFile("file1", 0644, "1234567890");
 	fprintf(list, "file1\n");

 	/* "hardlink" */
 	assertMakeHardlink("hardlink", "file1");
 	fprintf(list, "hardlink\n");

 	/* Another hardlink, but this one won't be archived. */
 	assertMakeHardlink("hardlink2", "file1");

 	/* "symlink" */
 	if (canSymlink()) {
 		assertMakeSymlink("symlink", "file1");
 		fprintf(list, "symlink\n");
 	}

 	/* "dir" */
 	assertMakeDir("dir", 0775);
 	fprintf(list, "dir\n");

 	/* Setup result message. */
 	memset(result, 0, sizeof(result));
 	if (is_LargeInode("file1"))
 		strncat(result,
 		    "bsdcpio: file1: large inode number truncated: "
 		    "Numerical result out of range\n",
 		    sizeof(result) - strlen(result) -1);
 	if (canSymlink() && is_LargeInode("symlink"))
 		strncat(result,
 		    "bsdcpio: symlink: large inode number truncated: "
 			"Numerical result out of range\n",
 		    sizeof(result) - strlen(result) -1);
 	if (is_LargeInode("dir"))
 		strncat(result,
 		    "bsdcpio: dir: large inode number truncated: "
 		    "Numerical result out of range\n",
 		    sizeof(result) - strlen(result) -1);
 	if (is_LargeInode("hardlink"))
 		strncat(result,
 		    "bsdcpio: hardlink: large inode number truncated: "
 		    "Numerical result out of range\n",
 		    sizeof(result) - strlen(result) -1);

 	/* Record some facts about what we just created: */
 	now = time(NULL); /* They were all created w/in last two seconds. */

 	/* Use the cpio program to create an archive. */
 	fclose(list);
 	r = systemf("%s -o --format=newc <list >newc.out 2>newc.err",
 	    testprog);
 	if (!assertEqualInt(r, 0))
 		return;

 	/* Verify that nothing went to stderr. */
 	if (canSymlink()) {
 		strncat(result, "2 blocks\n", sizeof(result) - strlen(result) -1);
 	} else {
 		strncat(result, "1 block\n", sizeof(result) - strlen(result) -1);
 	}
 	assertTextFileContents(result, "newc.err");

 	/* Verify that stdout is a well-formed cpio file in "newc" format. */
 	p = slurpfile(&s, "newc.out");
 	assertEqualInt(s, canSymlink() ? 1024 : 512);
 	e = p;

 	/*
 	 * Some of these assertions could be stronger, but it's
 	 * a little tricky because they depend on the local environment.
 	 */

 	/* First entry is "file1" */
 	assert(is_hex(e, 110)); /* Entire header is octal digits. */
 	assertEqualMem(e + 0, "070701", 6); /* Magic */
 	ino = from_hex(e + 6, 8); /* ino */
 #if defined(_WIN32) && !defined(__CYGWIN__)
 	/* Group members bits and others bits do not work. */
 	assertEqualInt(0x8180, from_hex(e + 14, 8) & 0xffc0); /* Mode */
 #else
 	assertEqualInt(0x81a4, from_hex(e + 14, 8)); /* Mode */
 #endif
 	if (uid < 0)
 		uid = from_hex(e + 22, 8);
 	assertEqualInt(from_hex(e + 22, 8), uid); /* uid */
 	gid = from_hex(e + 30, 8); /* gid */
 	assertEqualMem(e + 38, "00000003", 8); /* nlink */
 	t = from_hex(e + 46, 8); /* mtime */
 	failure("t=0x%08x now=0x%08x=%d", t, now, now);
 	assert(t <= now); /* File wasn't created in future. */
 	failure("t=0x%08x now - 2=0x%08x = %d", t, now - 2, now - 2);
 	assert(t >= now - 2); /* File was created w/in last 2 secs. */
 	failure("newc format stores body only with last appearance of a link\n"
 	    "       first appearance should be empty, so this file size\n"
 	    "       field should be zero");
 	assertEqualInt(0, from_hex(e + 54, 8)); /* File size */
 	fs = from_hex(e + 54, 8);
 	fs += PAD(fs, 4);
 	devmajor = from_hex(e + 62, 8); /* devmajor */
 	devminor = from_hex(e + 70, 8); /* devminor */
 	assert(is_hex(e + 78, 8)); /* rdevmajor */
 	assert(is_hex(e + 86, 8)); /* rdevminor */
 	assertEqualMem(e + 94, "00000006", 8); /* Name size */
 	ns = from_hex(e + 94, 8);
 	ns += PAD(ns + 2, 4);
 	assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
 	assertEqualMem(e + 110, "file1\0", 6); /* Name contents */
 	/* Since there's another link, no file contents here. */
 	/* But add in file size so that an error here doesn't cascade. */
 	e += 110 + fs + ns;

 	if (canSymlink()) {
 		/* "symlink" pointing to "file1" */
 		assert(is_hex(e, 110));
 		assertEqualMem(e + 0, "070701", 6); /* Magic */
 		assert(is_hex(e + 6, 8)); /* ino */
 		assertEqualInt(0xa1ff, from_hex(e + 14, 8)); /* Mode */
 		assertEqualInt(from_hex(e + 22, 8), uid); /* uid */
 		assertEqualInt(gid, from_hex(e + 30, 8)); /* gid */
 		assertEqualMem(e + 38, "00000001", 8); /* nlink */
 		t2 = from_hex(e + 46, 8); /* mtime */
 		failure("First entry created at t=0x%08x this entry created at t2=0x%08x", t, t2);
 		assert(t2 == t || t2 == t + 1); /* Almost same as first entry. */
 		assertEqualMem(e + 54, "00000005", 8); /* File size */
 		fs = from_hex(e + 54, 8);
 		fs += PAD(fs, 4);
 		assertEqualInt(devmajor, from_hex(e + 62, 8)); /* devmajor */
 		assertEqualInt(devminor, from_hex(e + 70, 8)); /* devminor */
 		assert(is_hex(e + 78, 8)); /* rdevmajor */
 		assert(is_hex(e + 86, 8)); /* rdevminor */
 		assertEqualMem(e + 94, "00000008", 8); /* Name size */
 		ns = from_hex(e + 94, 8);
 		ns += PAD(ns + 2, 4);
 		assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
 		assertEqualMem(e + 110, "symlink\0\0\0", 10); /* Name contents */
 		assertEqualMem(e + 110 + ns, "file1\0\0\0", 8); /* symlink target */
 		e += 110 + fs + ns;
 	}

 	/* "dir" */
 	assert(is_hex(e, 110));
 	assertEqualMem(e + 0, "070701", 6); /* Magic */
 	assert(is_hex(e + 6, 8)); /* ino */
 #if defined(_WIN32) && !defined(__CYGWIN__)
 	/* Group members bits and others bits do not work. */
 	assertEqualInt(0x41c0, from_hex(e + 14, 8) & 0xffc0); /* Mode */
 #else
 	/* Mode: sgid bit sometimes propagates from parent dirs, ignore it. */
 	assertEqualInt(040775, from_hex(e + 14, 8) & ~02000);
 #endif
 	assertEqualInt(uid, from_hex(e + 22, 8)); /* uid */
 	assertEqualInt(gid, from_hex(e + 30, 8)); /* gid */
 #if !defined(_WIN32) || defined(__CYGWIN__)
 	assertEqualInt(nlinks("dir"), from_hex(e + 38, 8)); /* nlinks */
 #endif
 	t2 = from_hex(e + 46, 8); /* mtime */
 	failure("First entry created at t=0x%08x this entry created at t2=0x%08x", t, t2);
 	assert(t2 == t || t2 == t + 1); /* Almost same as first entry. */
 	assertEqualMem(e + 54, "00000000", 8); /* File size */
 	fs = from_hex(e + 54, 8);
 	fs += PAD(fs, 4);
 	assertEqualInt(devmajor, from_hex(e + 62, 8)); /* devmajor */
 	assertEqualInt(devminor, from_hex(e + 70, 8)); /* devminor */
 	assert(is_hex(e + 78, 8)); /* rdevmajor */
 	assert(is_hex(e + 86, 8)); /* rdevminor */
 	assertEqualMem(e + 94, "00000004", 8); /* Name size */
 	ns = from_hex(e + 94, 8);
 	ns += PAD(ns + 2, 4);
 	assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
 	assertEqualMem(e + 110, "dir\0\0\0", 6); /* Name contents */
 	e += 110 + fs + ns;

 	/* Hardlink identical to "file1" */
 	/* Since we only wrote two of the three links to this
 	 * file, this link should get deferred by the hardlink logic. */
 	assert(is_hex(e, 110));
 	assertEqualMem(e + 0, "070701", 6); /* Magic */
 	failure("If these aren't the same, then the hardlink detection failed to match them.");
 	assertEqualInt(ino, from_hex(e + 6, 8)); /* ino */
 #if defined(_WIN32) && !defined(__CYGWIN__)
 	/* Group members bits and others bits do not work. */
 	assertEqualInt(0x8180, from_hex(e + 14, 8) & 0xffc0); /* Mode */
 #else
 	assertEqualInt(0x81a4, from_hex(e + 14, 8)); /* Mode */
 #endif
 	assertEqualInt(from_hex(e + 22, 8), uid); /* uid */
 	assertEqualInt(gid, from_hex(e + 30, 8)); /* gid */
 	assertEqualMem(e + 38, "00000003", 8); /* nlink */
 	t2 = from_hex(e + 46, 8); /* mtime */
 	failure("First entry created at t=0x%08x this entry created at t2=0x%08x", t, t2);
 	assert(t2 == t || t2 == t + 1); /* Almost same as first entry. */
 	assertEqualInt(10, from_hex(e + 54, 8)); /* File size */
 	fs = from_hex(e + 54, 8);
 	fs += PAD(fs, 4);
 	assertEqualInt(devmajor, from_hex(e + 62, 8)); /* devmajor */
 	assertEqualInt(devminor, from_hex(e + 70, 8)); /* devminor */
 	assert(is_hex(e + 78, 8)); /* rdevmajor */
 	assert(is_hex(e + 86, 8)); /* rdevminor */
 	assertEqualMem(e + 94, "00000009", 8); /* Name size */
 	ns = from_hex(e + 94, 8);
 	ns += PAD(ns + 2, 4);
 	assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
 	assertEqualMem(e + 110, "hardlink\0\0", 10); /* Name contents */
 	assertEqualMem(e + 110 + ns, "1234567890\0\0", 12); /* File contents */
 	e += 110 + ns + fs;

 	/* Last entry is end-of-archive marker. */
 	assert(is_hex(e, 110));
 	assertEqualMem(e + 0, "070701", 6); /* Magic */
 	assertEqualMem(e + 8, "00000000", 8); /* ino */
 	assertEqualMem(e + 14, "00000000", 8); /* mode */
 	assertEqualMem(e + 22, "00000000", 8); /* uid */
 	assertEqualMem(e + 30, "00000000", 8); /* gid */
 	assertEqualMem(e + 38, "00000001", 8); /* nlink */
 	assertEqualMem(e + 46, "00000000", 8); /* mtime */
 	assertEqualMem(e + 54, "00000000", 8); /* size */
 	assertEqualMem(e + 62, "00000000", 8); /* devmajor */
 	assertEqualMem(e + 70, "00000000", 8); /* devminor */
 	assertEqualMem(e + 78, "00000000", 8); /* rdevmajor */
 	assertEqualMem(e + 86, "00000000", 8); /* rdevminor */
 	assertEqualInt(11, from_hex(e + 94, 8)); /* name size */
 	assertEqualMem(e + 102, "00000000", 8); /* check field */
 	assertEqualMem(e + 110, "TRAILER!!!\0\0", 12); /* Name */

 	free(p);
 }
	/*-
	* Copyright (c) 2003-2007 Tim Kientzle
	* All rights reserved.
	*
	* Redistribution and use in source and binary forms, with or without
	* modification, are permitted provided that the following conditions
	* are met:
	* 1. Redistributions of source code must retain the above copyright
	* notice, this list of conditions and the following disclaimer.
	* 2. Redistributions in binary form must reproduce the above copyright
	* notice, this list of conditions and the following disclaimer in the
	* documentation and/or other materials provided with the distribution.
	*
	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
	* IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
	*/
	#include "test.h"
	__FBSDID("$FreeBSD: src/usr.bin/cpio/test/test_format_newc.c,v 1.2 2008/08/22 02:09:10 kientzle Exp $");

	/* Number of bytes needed to pad 'n' to multiple of 'block', assuming
	* that 'block' is a power of two. This trick can be more easily
	* remembered as -n & (block - 1), but many compilers quite reasonably
	* warn about "-n" when n is an unsigned value. (~(n) + 1) is the
	* same thing, but written in a way that won't offend anyone. */
	#define PAD(n, block) ((~(n) + 1) & ((block) - 1))

	static int
	is_hex(const char *p, size_t l)
	{
	while (l > 0) {
	if ((p >= '0' && p <= '9')
	\|\| (p >= 'a' && p <= 'f')
	\|\| (p >= 'A' && p <= 'F'))
	{
	--l;
	++p;
	} else
	return (0);

	}
	return (1);
	}

	static int
	from_hex(const char *p, size_t l)
	{
	int r = 0;

	while (l > 0) {
	r *= 16;
	if (p >= 'a' && p <= 'f')
	r += *p + 10 - 'a';
	else if (p >= 'A' && p <= 'F')
	r += *p + 10 - 'A';
	else
	r += *p - '0';
	--l;
	++p;
	}
	return (r);
	}

	#if !defined(_WIN32) \|\| defined(__CYGWIN__)
	static int
	nlinks(const char *p)
	{
	struct stat st;
	assertEqualInt(0, stat(p, &st));
	return st.st_nlink;
	}
	#endif

	DEFINE_TEST(test_format_newc)
	{
	FILE *list;
	int r;
	int devmajor, devminor, ino, gid;
	int uid = -1;
	time_t t, t2, now;
	char p, e;
	size_t s, fs, ns;
	char result[1024];

	assertUmask(0);

	#if !defined(_WIN32)
	uid = getuid();
	#endif

	/*
	* Create an assortment of files.
	* TODO: Extend this to cover more filetypes.
	*/
	list = fopen("list", "w");

	/* "file1" */
	assertMakeFile("file1", 0644, "1234567890");
	fprintf(list, "file1\n");

	/* "hardlink" */
	assertMakeHardlink("hardlink", "file1");
	fprintf(list, "hardlink\n");

	/* Another hardlink, but this one won't be archived. */
	assertMakeHardlink("hardlink2", "file1");

	/* "symlink" */
	if (canSymlink()) {
	assertMakeSymlink("symlink", "file1");
	fprintf(list, "symlink\n");
	}

	/* "dir" */
	assertMakeDir("dir", 0775);
	fprintf(list, "dir\n");

	/* Setup result message. */
	memset(result, 0, sizeof(result));
	if (is_LargeInode("file1"))
	strncat(result,
	"bsdcpio: file1: large inode number truncated: "
	"Numerical result out of range\n",
	sizeof(result) - strlen(result) -1);
	if (canSymlink() && is_LargeInode("symlink"))
	strncat(result,
	"bsdcpio: symlink: large inode number truncated: "
	"Numerical result out of range\n",
	sizeof(result) - strlen(result) -1);
	if (is_LargeInode("dir"))
	strncat(result,
	"bsdcpio: dir: large inode number truncated: "
	"Numerical result out of range\n",
	sizeof(result) - strlen(result) -1);
	if (is_LargeInode("hardlink"))
	strncat(result,
	"bsdcpio: hardlink: large inode number truncated: "
	"Numerical result out of range\n",
	sizeof(result) - strlen(result) -1);

	/* Record some facts about what we just created: */
	now = time(NULL); /* They were all created w/in last two seconds. */

	/* Use the cpio program to create an archive. */
	fclose(list);
	r = systemf("%s -o --format=newc <list >newc.out 2>newc.err",
	testprog);
	if (!assertEqualInt(r, 0))
	return;

	/* Verify that nothing went to stderr. */
	if (canSymlink()) {
	strncat(result, "2 blocks\n", sizeof(result) - strlen(result) -1);
	} else {
	strncat(result, "1 block\n", sizeof(result) - strlen(result) -1);
	}
	assertTextFileContents(result, "newc.err");

	/* Verify that stdout is a well-formed cpio file in "newc" format. */
	p = slurpfile(&s, "newc.out");
	assertEqualInt(s, canSymlink() ? 1024 : 512);
	e = p;

	/*
	* Some of these assertions could be stronger, but it's
	* a little tricky because they depend on the local environment.
	*/

	/* First entry is "file1" */
	assert(is_hex(e, 110)); /* Entire header is octal digits. */
	assertEqualMem(e + 0, "070701", 6); /* Magic */
	ino = from_hex(e + 6, 8); /* ino */
	#if defined(_WIN32) && !defined(__CYGWIN__)
	/* Group members bits and others bits do not work. */
	assertEqualInt(0x8180, from_hex(e + 14, 8) & 0xffc0); /* Mode */
	#else
	assertEqualInt(0x81a4, from_hex(e + 14, 8)); /* Mode */
	#endif
	if (uid < 0)
	uid = from_hex(e + 22, 8);
	assertEqualInt(from_hex(e + 22, 8), uid); /* uid */
	gid = from_hex(e + 30, 8); /* gid */
	assertEqualMem(e + 38, "00000003", 8); /* nlink */
	t = from_hex(e + 46, 8); /* mtime */
	failure("t=0x%08x now=0x%08x=%d", t, now, now);
	assert(t <= now); /* File wasn't created in future. */
	failure("t=0x%08x now - 2=0x%08x = %d", t, now - 2, now - 2);
	assert(t >= now - 2); /* File was created w/in last 2 secs. */
	failure("newc format stores body only with last appearance of a link\n"
	" first appearance should be empty, so this file size\n"
	" field should be zero");
	assertEqualInt(0, from_hex(e + 54, 8)); /* File size */
	fs = from_hex(e + 54, 8);
	fs += PAD(fs, 4);
	devmajor = from_hex(e + 62, 8); /* devmajor */
	devminor = from_hex(e + 70, 8); /* devminor */
	assert(is_hex(e + 78, 8)); /* rdevmajor */
	assert(is_hex(e + 86, 8)); /* rdevminor */
	assertEqualMem(e + 94, "00000006", 8); /* Name size */
	ns = from_hex(e + 94, 8);
	ns += PAD(ns + 2, 4);
	assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
	assertEqualMem(e + 110, "file1\0", 6); /* Name contents */
	/* Since there's another link, no file contents here. */
	/* But add in file size so that an error here doesn't cascade. */
	e += 110 + fs + ns;

	if (canSymlink()) {
	/* "symlink" pointing to "file1" */
	assert(is_hex(e, 110));
	assertEqualMem(e + 0, "070701", 6); /* Magic */
	assert(is_hex(e + 6, 8)); /* ino */
	assertEqualInt(0xa1ff, from_hex(e + 14, 8)); /* Mode */
	assertEqualInt(from_hex(e + 22, 8), uid); /* uid */
	assertEqualInt(gid, from_hex(e + 30, 8)); /* gid */
	assertEqualMem(e + 38, "00000001", 8); /* nlink */
	t2 = from_hex(e + 46, 8); /* mtime */
	failure("First entry created at t=0x%08x this entry created at t2=0x%08x", t, t2);
	assert(t2 == t \|\| t2 == t + 1); /* Almost same as first entry. */
	assertEqualMem(e + 54, "00000005", 8); /* File size */
	fs = from_hex(e + 54, 8);
	fs += PAD(fs, 4);
	assertEqualInt(devmajor, from_hex(e + 62, 8)); /* devmajor */
	assertEqualInt(devminor, from_hex(e + 70, 8)); /* devminor */
	assert(is_hex(e + 78, 8)); /* rdevmajor */
	assert(is_hex(e + 86, 8)); /* rdevminor */
	assertEqualMem(e + 94, "00000008", 8); /* Name size */
	ns = from_hex(e + 94, 8);
	ns += PAD(ns + 2, 4);
	assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
	assertEqualMem(e + 110, "symlink\0\0\0", 10); /* Name contents */
	assertEqualMem(e + 110 + ns, "file1\0\0\0", 8); /* symlink target */
	e += 110 + fs + ns;
	}

	/* "dir" */
	assert(is_hex(e, 110));
	assertEqualMem(e + 0, "070701", 6); /* Magic */
	assert(is_hex(e + 6, 8)); /* ino */
	#if defined(_WIN32) && !defined(__CYGWIN__)
	/* Group members bits and others bits do not work. */
	assertEqualInt(0x41c0, from_hex(e + 14, 8) & 0xffc0); /* Mode */
	#else
	/* Mode: sgid bit sometimes propagates from parent dirs, ignore it. */
	assertEqualInt(040775, from_hex(e + 14, 8) & ~02000);
	#endif
	assertEqualInt(uid, from_hex(e + 22, 8)); /* uid */
	assertEqualInt(gid, from_hex(e + 30, 8)); /* gid */
	#if !defined(_WIN32) \|\| defined(__CYGWIN__)
	assertEqualInt(nlinks("dir"), from_hex(e + 38, 8)); /* nlinks */
	#endif
	t2 = from_hex(e + 46, 8); /* mtime */
	failure("First entry created at t=0x%08x this entry created at t2=0x%08x", t, t2);
	assert(t2 == t \|\| t2 == t + 1); /* Almost same as first entry. */
	assertEqualMem(e + 54, "00000000", 8); /* File size */
	fs = from_hex(e + 54, 8);
	fs += PAD(fs, 4);
	assertEqualInt(devmajor, from_hex(e + 62, 8)); /* devmajor */
	assertEqualInt(devminor, from_hex(e + 70, 8)); /* devminor */
	assert(is_hex(e + 78, 8)); /* rdevmajor */
	assert(is_hex(e + 86, 8)); /* rdevminor */
	assertEqualMem(e + 94, "00000004", 8); /* Name size */
	ns = from_hex(e + 94, 8);
	ns += PAD(ns + 2, 4);
	assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
	assertEqualMem(e + 110, "dir\0\0\0", 6); /* Name contents */
	e += 110 + fs + ns;

	/* Hardlink identical to "file1" */
	/* Since we only wrote two of the three links to this
	* file, this link should get deferred by the hardlink logic. */
	assert(is_hex(e, 110));
	assertEqualMem(e + 0, "070701", 6); /* Magic */
	failure("If these aren't the same, then the hardlink detection failed to match them.");
	assertEqualInt(ino, from_hex(e + 6, 8)); /* ino */
	#if defined(_WIN32) && !defined(__CYGWIN__)
	/* Group members bits and others bits do not work. */
	assertEqualInt(0x8180, from_hex(e + 14, 8) & 0xffc0); /* Mode */
	#else
	assertEqualInt(0x81a4, from_hex(e + 14, 8)); /* Mode */
	#endif
	assertEqualInt(from_hex(e + 22, 8), uid); /* uid */
	assertEqualInt(gid, from_hex(e + 30, 8)); /* gid */
	assertEqualMem(e + 38, "00000003", 8); /* nlink */
	t2 = from_hex(e + 46, 8); /* mtime */
	failure("First entry created at t=0x%08x this entry created at t2=0x%08x", t, t2);
	assert(t2 == t \|\| t2 == t + 1); /* Almost same as first entry. */
	assertEqualInt(10, from_hex(e + 54, 8)); /* File size */
	fs = from_hex(e + 54, 8);
	fs += PAD(fs, 4);
	assertEqualInt(devmajor, from_hex(e + 62, 8)); /* devmajor */
	assertEqualInt(devminor, from_hex(e + 70, 8)); /* devminor */
	assert(is_hex(e + 78, 8)); /* rdevmajor */
	assert(is_hex(e + 86, 8)); /* rdevminor */
	assertEqualMem(e + 94, "00000009", 8); /* Name size */
	ns = from_hex(e + 94, 8);
	ns += PAD(ns + 2, 4);
	assertEqualInt(0, from_hex(e + 102, 8)); /* check field */
	assertEqualMem(e + 110, "hardlink\0\0", 10); /* Name contents */
	assertEqualMem(e + 110 + ns, "1234567890\0\0", 12); /* File contents */
	e += 110 + ns + fs;

	/* Last entry is end-of-archive marker. */
	assert(is_hex(e, 110));
	assertEqualMem(e + 0, "070701", 6); /* Magic */
	assertEqualMem(e + 8, "00000000", 8); /* ino */
	assertEqualMem(e + 14, "00000000", 8); /* mode */
	assertEqualMem(e + 22, "00000000", 8); /* uid */
	assertEqualMem(e + 30, "00000000", 8); /* gid */
	assertEqualMem(e + 38, "00000001", 8); /* nlink */
	assertEqualMem(e + 46, "00000000", 8); /* mtime */
	assertEqualMem(e + 54, "00000000", 8); /* size */
	assertEqualMem(e + 62, "00000000", 8); /* devmajor */
	assertEqualMem(e + 70, "00000000", 8); /* devminor */
	assertEqualMem(e + 78, "00000000", 8); /* rdevmajor */
	assertEqualMem(e + 86, "00000000", 8); /* rdevminor */
	assertEqualInt(11, from_hex(e + 94, 8)); /* name size */
	assertEqualMem(e + 102, "00000000", 8); /* check field */
	assertEqualMem(e + 110, "TRAILER!!!\0\0", 12); /* Name */

	free(p);
	}