Index: tests/Makefile
==================================================================
--- tests/Makefile
+++ tests/Makefile
@@ -64,10 +64,11 @@
        OFValueTests.m				\
        OFXMLElementBuilderTests.m		\
        OFXMLNodeTests.m				\
        OFXMLParserTests.m			\
        OFZIPArchiveTests.m			\
+       OFZooArchiveTests.m			\
        ${RUNTIME_ARC_TESTS_M}			\
        RuntimeTests.m				\
        ${USE_SRCS_PLUGINS}			\
        ${USE_SRCS_SOCKETS}			\
        ${USE_SRCS_SUBPROCESSES}			\

ADDED   tests/OFZooArchiveTests.m
Index: tests/OFZooArchiveTests.m
==================================================================
--- tests/OFZooArchiveTests.m
+++ tests/OFZooArchiveTests.m
@@ -0,0 +1,63 @@
+/*
+ * Copyright (c) 2008-2024 Jonathan Schleifer <js@nil.im>
+ *
+ * All rights reserved.
+ *
+ * This file is part of ObjFW. It may be distributed under the terms of the
+ * Q Public License 1.0, which can be found in the file LICENSE.QPL included in
+ * the packaging of this file.
+ *
+ * Alternatively, it may be distributed under the terms of the GNU General
+ * Public License, either version 2 or 3, which can be found in the file
+ * LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
+ * file.
+ */
+
+#include "config.h"
+
+#import "ObjFW.h"
+#import "ObjFWTest.h"
+
+#define bufferSize 4096
+
+@interface OFZooArchiveTests: OTTestCase
+{
+	char _buffer[bufferSize];
+}
+@end
+
+@implementation OFZooArchiveTests
+- (void)testCreateAndExtractArchive
+{
+	OFMemoryStream *stream = [OFMemoryStream
+	    streamWithMemoryAddress: _buffer
+			       size: bufferSize
+			   writable: true];
+	OFZooArchive *archive = [OFZooArchive archiveWithStream: stream
+							   mode: @"w"];
+	OFZooArchiveEntry *entry =
+	    [OFMutableZooArchiveEntry entryWithFileName: @"testfile.txt"];
+	OFStream *entryStream = [archive streamForWritingEntry: entry];
+	size_t size;
+
+	[entryStream writeString: @"Hello World!"];
+	[archive close];
+
+	size = [stream seekToOffset: 0 whence: OFSeekCurrent];
+	OTAssertLessThanOrEqual(size, bufferSize);
+
+	stream = [OFMemoryStream streamWithMemoryAddress: _buffer
+						    size: size
+						writable: false];
+	archive = [OFZooArchive archiveWithStream: stream mode: @"r"];
+
+	entry = [archive nextEntry];
+	OTAssertEqualObjects(entry.fileName, @"testfile.txt");
+
+	entryStream = [archive streamForReadingCurrentEntry];
+	OTAssertEqualObjects([entryStream readLine], @"Hello World!");
+	OTAssertNil([entryStream readLine]);
+
+	OTAssertNil([archive nextEntry]);
+}
+@end