commit c084e154f7fb79fb08150e73c8b30ba857983147
parent e6b6fd9d106da9b8083f56782f68228ff56955fc
Author: Vincent Forest <vincent.forest@meso-star.com>
Date: Wed, 23 Apr 2025 16:15:37 +0200
Taking writer tests a step further
Test StL ASCII and binary writing
Diffstat:
3 files changed, 347 insertions(+), 289 deletions(-)
diff --git a/Makefile b/Makefile
@@ -148,7 +148,7 @@ TEST_SRC =\
src/test_sstl.c\
src/test_sstl_load_ascii.c\
src/test_sstl_load_binary.c\
- src/test_sstl_write_ascii.c
+ src/test_sstl_writer.c
TEST_OBJ = $(TEST_SRC:.c=.o)
TEST_DEP = $(TEST_SRC:.c=.d)
TEST_TGT = $(TEST_SRC:.c=.t)
@@ -181,7 +181,7 @@ $(TEST_OBJ): config.mk sstl-local.pc
test_sstl \
test_sstl_load_ascii \
test_sstl_load_binary \
-test_sstl_write_ascii \
+test_sstl_writer \
: config.mk sstl-local.pc $(LIBNAME)
$(CC) $(CFLAGS_TEST) -o $@ src/$@.o $(LDFLAGS_TEST)
diff --git a/src/test_sstl_write_ascii.c b/src/test_sstl_write_ascii.c
@@ -1,287 +0,0 @@
-/* Copyright (C) 2015, 2016, 2019, 2021, 2023, 2025 |Méso|Star> (contact@meso-star.com)
- *
- * This program is free software: you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation, either version 3 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public License
- * along with this program. If not, see <http://www.gnu.org/licenses/>. */
-
-#define _POSIX_C_SOURCE 200112L /* fork */
-
-#include "sstl.h"
-
-#include <rsys/float3.h>
-#include <rsys/logger.h>
-#include <rsys/mem_allocator.h>
-
-#include <string.h>
-#include <unistd.h> /* fork, pipe */
-
-/*******************************************************************************
- * Helper functions
- ******************************************************************************/
-static void
-log_stream(const char* msg, void* ctx)
-{
- ASSERT(msg);
- (void)msg, (void)ctx;
- printf("%s\n", msg);
-}
-
-static void
-check_api(void)
-{
- struct logger logger;
- struct mem_allocator allocator;
- struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
- struct sstl_writer* writer = NULL;
- const char* filename = "test.stl";
-
- CHK(sstl_writer_create(NULL, &writer) == RES_BAD_ARG);
- CHK(sstl_writer_create(&args, NULL) == RES_BAD_ARG);
- CHK(sstl_writer_create(&args, &writer) == RES_BAD_ARG);
-
- args.filename = filename;
- CHK(sstl_writer_create(&args, &writer) == RES_OK);
-
- CHK(sstl_write_facet(NULL, &SSTL_FACET_NULL) == RES_BAD_ARG);
- CHK(sstl_write_facet(writer, NULL) == RES_BAD_ARG);
- CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_OK);
-
- CHK(sstl_writer_ref_get(NULL) == RES_BAD_ARG);
- CHK(sstl_writer_ref_get(writer) == RES_OK);
- CHK(sstl_writer_ref_put(NULL) == RES_BAD_ARG);
- CHK(sstl_writer_ref_put(writer) == RES_OK);
- CHK(sstl_writer_ref_put(writer) == RES_OK);
-
- args.triangles_count = 0;
- CHK(sstl_writer_create(&args, &writer) == RES_OK);
- CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_BAD_OP);
- CHK(sstl_writer_ref_put(writer) == RES_OK);
-
- mem_init_proxy_allocator(&allocator, &mem_default_allocator);
- CHK(logger_init(&allocator, &logger) == RES_OK);
- logger_set_stream(&logger, LOG_OUTPUT, log_stream, NULL);
- logger_set_stream(&logger, LOG_ERROR, log_stream, NULL);
- logger_set_stream(&logger, LOG_WARNING, log_stream, NULL);
-
- args.allocator = &allocator;
- args.logger = &logger;
- args.triangles_count = 1;
- CHK(sstl_writer_create(&args, &writer) == RES_OK);
- CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_OK);
- CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_BAD_OP);
- CHK(sstl_writer_ref_put(writer) == RES_OK);
-
- logger_release(&logger);
- CHK(MEM_ALLOCATED_SIZE(&allocator) == 0);
- mem_shutdown_proxy_allocator(&allocator);
-}
-
-static void
-check_1_triangle(struct sstl* sstl)
-{
- struct sstl_desc desc = SSTL_DESC_NULL;
- struct sstl_facet facet = SSTL_FACET_NULL;
- struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
- struct sstl_writer* writer = NULL;
-
- float v[3] = {0,0,0};
- const char* filename = "1_triangle.stl";
-
- args.filename = filename;
- args.triangles_count = 1;
- CHK(sstl_writer_create(&args, &writer) == RES_OK);
-
- f3_splat(facet.normal, 0); /* Let sstl calculate it automatically */
- f3(facet.vertices[0], 0.f, 0.f, 0.f);
- f3(facet.vertices[1], 1.f, 0.f, 0.f);
- f3(facet.vertices[2], 0.f, 0.f, 1.f);
- CHK(sstl_write_facet(writer, &facet) == RES_OK);
- CHK(sstl_write_facet(writer, &facet) == RES_BAD_OP);
-
- CHK(sstl_writer_ref_put(writer) == RES_OK);
-
- CHK(sstl_load(sstl, filename) == RES_OK);
- CHK(sstl_get_desc(sstl, &desc) == RES_OK);
-
- CHK(desc.type == SSTL_ASCII);
- CHK(!strcmp(desc.filename, filename));
- CHK(desc.solid_name == NULL);
- CHK(desc.vertices_count == 3);
- CHK(desc.triangles_count == 1);
- CHK(desc.indices[0] == 0);
- CHK(desc.indices[1] == 1);
- CHK(desc.indices[2] == 2);
- CHK(f3_eq(desc.vertices + 0*3, f3(v, 0.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + 1*3, f3(v, 1.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + 2*3, f3(v, 0.f, 0.f, 1.f)) == 1);
- CHK(f3_eq(desc.normals, f3(v, 0.f, -1.f, 0.f)) == 1);
-}
-
-static void
-check_tetrahedron(struct sstl* sstl)
-{
- struct sstl_desc desc = SSTL_DESC_NULL;
- struct sstl_facet facet = SSTL_FACET_NULL;
- struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
- struct sstl_writer* writer = NULL;
-
- float v[3] = {0,0,0};
- FILE* fp = NULL;
- const char* filename = "Tetrahedron";
-
- CHK((fp = tmpfile()) != NULL);
- args.filename = filename;
- args.stream = fp;
- args.solid_name = "cube corner";
- CHK(sstl_writer_create(&args, &writer) == RES_OK);
-
- f3(facet.normal, 0.f,-1.f, 0.f);
- f3(facet.vertices[0], 0.f, 0.f, 0.f);
- f3(facet.vertices[1], 1.f, 0.f, 0.f);
- f3(facet.vertices[2], 0.f, 0.f, 1.f);
- CHK(sstl_write_facet(writer, &facet) == RES_OK);
-
- f3(facet.normal, 0.f, 0.f, -1.f);
- f3(facet.vertices[0], 0.f, 0.f, 0.f);
- f3(facet.vertices[1], 0.f, 1.f, 0.f);
- f3(facet.vertices[2], 1.f, 0.f, 0.f);
- CHK(sstl_write_facet(writer, &facet) == RES_OK);
-
- f3(facet.normal,-1.f, 0.f, 0.f);
- f3(facet.vertices[0], 0.f, 0.f, 0.f);
- f3(facet.vertices[1], 0.f, 0.f, 1.f);
- f3(facet.vertices[2], 0.f, 1.f, 0.f);
- CHK(sstl_write_facet(writer, &facet) == RES_OK);
-
-
- f3(facet.normal, 0.577f, 0.577f, 0.577f);
- f3(facet.vertices[0], 1.f, 0.f, 0.f);
- f3(facet.vertices[1], 0.f, 1.f, 0.f);
- f3(facet.vertices[2], 0.f, 0.f, 1.f);
- CHK(sstl_write_facet(writer, &facet) == RES_OK);
-
- CHK(sstl_writer_ref_put(writer) == RES_OK);
-
- rewind(fp);
- CHK(sstl_load_stream_ascii(sstl, fp, filename) == RES_OK);
- CHK(fclose(fp) == 0);
-
- CHK(sstl_get_desc(sstl, &desc) == RES_OK);
- CHK(!strcmp(desc.filename, filename));
- CHK(!strcmp(desc.solid_name, "cube corner"));
- CHK(desc.type == SSTL_ASCII);
- CHK(desc.vertices_count == 4);
- CHK(desc.triangles_count == 4);
-
- CHK(f3_eq(desc.vertices + desc.indices[0]*3, f3(v, 0.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[1]*3, f3(v, 1.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[2]*3, f3(v, 0.f, 0.f, 1.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[3]*3, f3(v, 0.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[4]*3, f3(v, 0.f, 1.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[5]*3, f3(v, 1.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[6]*3, f3(v, 0.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[7]*3, f3(v, 0.f, 0.f, 1.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[8]*3, f3(v, 0.f, 1.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[9]*3, f3(v, 1.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[10]*3, f3(v, 0.f, 1.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + desc.indices[11]*3, f3(v, 0.f, 0.f, 1.f)) == 1);
-
- CHK(f3_eq(desc.normals + 0*3, f3(v, 0.f,-1.f, 0.f)) == 1);
- CHK(f3_eq(desc.normals + 1*3, f3(v, 0.f, 0.f,-1.f)) == 1);
- CHK(f3_eq(desc.normals + 2*3, f3(v,-1.f, 0.f, 0.f)) == 1);
- f3_normalize(v, f3(v, 1.f, 1.f, 1.f));
- CHK(f3_eq_eps(desc.normals + 3*3, v, 1.e-6f) == 1);
-}
-
-static void
-check_no_seekable_file(struct sstl* sstl)
-{
- int fd[2] = {0,0};
- const char* filename = "Pipe";
- pid_t pid = 0;
-
- CHK(pipe(fd) == 0);
- CHK((pid = fork()) != -1);
-
- if(pid == 0) { /* Child process */
- struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
- struct sstl_facet facet = SSTL_FACET_NULL;
- struct sstl_writer* writer = NULL;
- FILE* fp = NULL;
-
- CHK(close(fd[0]) == 0); /* Close the unused input stream */
- CHK(sstl_ref_put(sstl) == RES_OK); /* Release the unused sstl */
-
- CHK((fp = fdopen(fd[1], "w")) != NULL);
-
- args.solid_name = "Triangle";
- args.filename = filename;
- args.stream = fp;
- CHK(sstl_writer_create(&args, &writer) == RES_OK);
-
- f3(facet.normal, 0.f,-1.f, 0.f);
- f3(facet.vertices[0], 1.f, 0.f, 0.f);
- f3(facet.vertices[1], 0.f, 0.f, 1.f);
- f3(facet.vertices[2], 0.f, 0.f, 0.f);
- CHK(sstl_write_facet(writer, &facet) == RES_OK);
-
- CHK(sstl_writer_ref_put(writer) == RES_OK);
- CHK(fclose(fp) == 0);
- exit(0);
-
- } else { /* Parent process */
- struct sstl_desc desc = SSTL_DESC_NULL;
- float v[3];
- FILE* fp = NULL;
-
- CHK(close(fd[1]) == 0); /* Close the unused output stream */
-
- CHK(fp = fdopen(fd[0], "r"));
- CHK(sstl_load_stream_ascii(sstl, fp, filename) == RES_OK);
- CHK(fclose(fp) == 0);
-
- CHK(sstl_get_desc(sstl, &desc) == RES_OK);
- CHK(desc.type == SSTL_ASCII);
- CHK(!strcmp(desc.filename, filename));
- CHK(!strcmp(desc.solid_name, "Triangle"));
- CHK(desc.vertices_count == 3);
- CHK(desc.triangles_count == 1);
- CHK(desc.indices[0] == 0);
- CHK(desc.indices[1] == 1);
- CHK(desc.indices[2] == 2);
- CHK(f3_eq(desc.vertices + 0*3, f3(v, 1.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.vertices + 1*3, f3(v, 0.f, 0.f, 1.f)) == 1);
- CHK(f3_eq(desc.vertices + 2*3, f3(v, 0.f, 0.f, 0.f)) == 1);
- CHK(f3_eq(desc.normals, f3(v, 0.f, -1.f, 0.f)) == 1);
- }
-}
-
-/*******************************************************************************
- * The test
- ******************************************************************************/
-int
-main(int argc, char** argv)
-{
- struct sstl* sstl = NULL;
- (void)argc, (void)argv;
-
- CHK(sstl_create(NULL, NULL, 3, &sstl) == RES_OK);
-
- check_api();
- check_1_triangle(sstl);
- check_tetrahedron(sstl);
- check_no_seekable_file(sstl);
-
- CHK(sstl_ref_put(sstl) == RES_OK);
- CHK(mem_allocated_size() == 0);
- return 0;
-}
diff --git a/src/test_sstl_writer.c b/src/test_sstl_writer.c
@@ -0,0 +1,345 @@
+/* Copyright (C) 2015, 2016, 2019, 2021, 2023, 2025 |Méso|Star> (contact@meso-star.com)
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>. */
+
+#define _POSIX_C_SOURCE 200112L /* fork */
+
+#include "sstl.h"
+
+#include <rsys/float3.h>
+#include <rsys/logger.h>
+#include <rsys/mem_allocator.h>
+
+#include <string.h>
+#include <unistd.h> /* fork, pipe */
+
+/*******************************************************************************
+ * Helper functions
+ ******************************************************************************/
+static void
+log_stream(const char* msg, void* ctx)
+{
+ ASSERT(msg);
+ (void)msg, (void)ctx;
+ printf("logger %s", msg);
+}
+
+static void
+check_api(const enum sstl_type type)
+{
+ struct logger logger;
+ struct mem_allocator allocator;
+ struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
+ struct sstl_writer* writer = NULL;
+ const char* filename = "test.stl";
+
+ CHK(sstl_writer_create(NULL, &writer) == RES_BAD_ARG);
+ CHK(sstl_writer_create(&args, NULL) == RES_BAD_ARG);
+ CHK(sstl_writer_create(&args, &writer) == RES_BAD_ARG);
+
+ args.filename = filename;
+ args.type = type;
+ args.verbose = 3;
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+
+ CHK(sstl_write_facet(NULL, &SSTL_FACET_NULL) == RES_BAD_ARG);
+ CHK(sstl_write_facet(writer, NULL) == RES_BAD_ARG);
+ CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_OK);
+
+ CHK(sstl_writer_ref_get(NULL) == RES_BAD_ARG);
+ CHK(sstl_writer_ref_get(writer) == RES_OK);
+ CHK(sstl_writer_ref_put(NULL) == RES_BAD_ARG);
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+
+ args.triangles_count = 0;
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+ CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_BAD_OP);
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+
+ mem_init_proxy_allocator(&allocator, &mem_default_allocator);
+ CHK(logger_init(&allocator, &logger) == RES_OK);
+ logger_set_stream(&logger, LOG_OUTPUT, log_stream, NULL);
+ logger_set_stream(&logger, LOG_ERROR, log_stream, NULL);
+ logger_set_stream(&logger, LOG_WARNING, log_stream, NULL);
+
+ args.allocator = &allocator;
+ args.logger = &logger;
+ args.triangles_count = 1;
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+ CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_OK);
+ CHK(sstl_write_facet(writer, &SSTL_FACET_NULL) == RES_BAD_OP);
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+
+ logger_release(&logger);
+ CHK(MEM_ALLOCATED_SIZE(&allocator) == 0);
+ mem_shutdown_proxy_allocator(&allocator);
+}
+
+static void
+check_1_triangle(struct sstl* sstl, const enum sstl_type type)
+{
+ struct sstl_desc desc = SSTL_DESC_NULL;
+ struct sstl_facet facet = SSTL_FACET_NULL;
+ struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
+ struct sstl_writer* writer = NULL;
+
+ float v[3] = {0,0,0};
+ const char* filename = "1_triangle.stl";
+
+ args.filename = filename;
+ args.type = type;
+ args.verbose = 3;
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+
+ f3_splat(facet.normal, 0); /* Let sstl calculate it automatically */
+ f3(facet.vertices[0], 0.f, 0.f, 0.f);
+ f3(facet.vertices[1], 1.f, 0.f, 0.f);
+ f3(facet.vertices[2], 0.f, 0.f, 1.f);
+ CHK(sstl_write_facet(writer, &facet) == RES_OK);
+
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+
+ CHK(sstl_load(sstl, filename) == RES_OK);
+ CHK(sstl_get_desc(sstl, &desc) == RES_OK);
+
+ CHK(desc.type == type);
+ CHK(!strcmp(desc.filename, filename));
+ CHK(desc.solid_name == NULL);
+ CHK(desc.vertices_count == 3);
+ CHK(desc.triangles_count == 1);
+ CHK(desc.indices[0] == 0);
+ CHK(desc.indices[1] == 1);
+ CHK(desc.indices[2] == 2);
+ CHK(f3_eq(desc.vertices + 0*3, f3(v, 0.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + 1*3, f3(v, 1.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + 2*3, f3(v, 0.f, 0.f, 1.f)) == 1);
+ CHK(f3_eq(desc.normals, f3(v, 0.f, -1.f, 0.f)) == 1);
+
+ /* The triangle is missing. A warning is signalled but no error is returned:
+ * author finalization is assumed to always succeed. Partial finalization
+ * corrupts the output, and it would be too hasardous to try returning to the
+ * previous state. Finally, detecting a finalization error prevents the writer
+ * from being released, adding a memory leak to the finalization error, which
+ * could be impossible to resolve. */
+ args.filename = filename;
+ args.type = SSTL_BINARY;
+ args.triangles_count = 1;
+ args.verbose = 3;
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+}
+
+static void
+check_tetrahedron(struct sstl* sstl, const enum sstl_type type)
+{
+ struct sstl_desc desc = SSTL_DESC_NULL;
+ struct sstl_facet facet = SSTL_FACET_NULL;
+ struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
+ struct sstl_writer* writer = NULL;
+
+ float v[3] = {0,0,0};
+ FILE* fp = NULL;
+ const char* filename = "Tetrahedron";
+
+ CHK((fp = tmpfile()) != NULL);
+ args.filename = filename;
+ args.stream = fp;
+ args.type = type;
+ args.solid_name = "cube corner";
+ args.verbose = 3;
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+
+ f3(facet.normal, 0.f,-1.f, 0.f);
+ f3(facet.vertices[0], 0.f, 0.f, 0.f);
+ f3(facet.vertices[1], 1.f, 0.f, 0.f);
+ f3(facet.vertices[2], 0.f, 0.f, 1.f);
+ CHK(sstl_write_facet(writer, &facet) == RES_OK);
+
+ f3(facet.normal, 0.f, 0.f, -1.f);
+ f3(facet.vertices[0], 0.f, 0.f, 0.f);
+ f3(facet.vertices[1], 0.f, 1.f, 0.f);
+ f3(facet.vertices[2], 1.f, 0.f, 0.f);
+ CHK(sstl_write_facet(writer, &facet) == RES_OK);
+
+ f3(facet.normal,-1.f, 0.f, 0.f);
+ f3(facet.vertices[0], 0.f, 0.f, 0.f);
+ f3(facet.vertices[1], 0.f, 0.f, 1.f);
+ f3(facet.vertices[2], 0.f, 1.f, 0.f);
+ CHK(sstl_write_facet(writer, &facet) == RES_OK);
+
+ f3(facet.normal, 0.577f, 0.577f, 0.577f);
+ f3(facet.vertices[0], 1.f, 0.f, 0.f);
+ f3(facet.vertices[1], 0.f, 1.f, 0.f);
+ f3(facet.vertices[2], 0.f, 0.f, 1.f);
+ CHK(sstl_write_facet(writer, &facet) == RES_OK);
+
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+
+ rewind(fp);
+ CHK(sstl_load_stream(sstl, fp, filename) == RES_OK);
+ CHK(fclose(fp) == 0);
+
+ CHK(sstl_get_desc(sstl, &desc) == RES_OK);
+ CHK(!strcmp(desc.filename, filename));
+ CHK(type == SSTL_BINARY || !strcmp(desc.solid_name, "cube corner"));
+ CHK(desc.type == type);
+ CHK(desc.vertices_count == 4);
+ CHK(desc.triangles_count == 4);
+
+ CHK(f3_eq(desc.vertices + desc.indices[0]*3, f3(v, 0.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[1]*3, f3(v, 1.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[2]*3, f3(v, 0.f, 0.f, 1.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[3]*3, f3(v, 0.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[4]*3, f3(v, 0.f, 1.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[5]*3, f3(v, 1.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[6]*3, f3(v, 0.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[7]*3, f3(v, 0.f, 0.f, 1.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[8]*3, f3(v, 0.f, 1.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[9]*3, f3(v, 1.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[10]*3, f3(v, 0.f, 1.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + desc.indices[11]*3, f3(v, 0.f, 0.f, 1.f)) == 1);
+
+ CHK(f3_eq(desc.normals + 0*3, f3(v, 0.f,-1.f, 0.f)) == 1);
+ CHK(f3_eq(desc.normals + 1*3, f3(v, 0.f, 0.f,-1.f)) == 1);
+ CHK(f3_eq(desc.normals + 2*3, f3(v,-1.f, 0.f, 0.f)) == 1);
+ f3_normalize(v, f3(v, 1.f, 1.f, 1.f));
+ CHK(f3_eq_eps(desc.normals + 3*3, v, 1.e-6f) == 1);
+}
+
+static void
+process_write(const enum sstl_type type, FILE* fp, const char* filename)
+{
+ struct sstl_writer_create_args args = SSTL_WRITER_CREATE_ARGS_DEFAULT;
+ struct sstl_facet facet = SSTL_FACET_NULL;
+ struct sstl_writer* writer = NULL;
+
+ args.solid_name = "Triangle";
+ args.filename = filename;
+ args.stream = fp;
+ args.type = type;
+ args.verbose = 3;
+
+ switch(type) {
+ case SSTL_ASCII:
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+ break;
+
+ case SSTL_BINARY:
+ /* Binary StL can be written only if the number of triangles is known in
+ * advance */
+ CHK(sstl_writer_create(&args, &writer) == RES_BAD_ARG);
+ args.triangles_count = 1;
+ CHK(sstl_writer_create(&args, &writer) == RES_OK);
+ break;
+
+ default: FATAL("Unreachable code\n"); break;
+ }
+
+ f3(facet.normal, 0.f,-1.f, 0.f);
+ f3(facet.vertices[0], 1.f, 0.f, 0.f);
+ f3(facet.vertices[1], 0.f, 0.f, 1.f);
+ f3(facet.vertices[2], 0.f, 0.f, 0.f);
+ CHK(sstl_write_facet(writer, &facet) == RES_OK);
+
+ CHK(sstl_writer_ref_put(writer) == RES_OK);
+}
+
+static void
+process_read
+ (struct sstl* sstl,
+ const enum sstl_type type,
+ FILE* fp,
+ const char* filename)
+{
+ struct sstl_desc desc = SSTL_DESC_NULL;
+ float v[3];
+
+ switch(type) {
+ case SSTL_ASCII:
+ CHK(sstl_load_stream_ascii(sstl, fp, filename) == RES_OK);
+ break;
+ case SSTL_BINARY:
+ CHK(sstl_load_stream_binary(sstl, fp, filename) == RES_OK);
+ break;
+ default: FATAL("Unreachable code\n"); break;
+ }
+
+ CHK(sstl_get_desc(sstl, &desc) == RES_OK);
+ CHK(desc.type == type);
+ CHK(!strcmp(desc.filename, filename));
+ CHK(type == SSTL_ASCII || desc.solid_name == NULL);
+ CHK(type == SSTL_BINARY || !strcmp(desc.solid_name, "Triangle"));
+ CHK(desc.vertices_count == 3);
+ CHK(desc.triangles_count == 1);
+ CHK(desc.indices[0] == 0);
+ CHK(desc.indices[1] == 1);
+ CHK(desc.indices[2] == 2);
+ CHK(f3_eq(desc.vertices + 0*3, f3(v, 1.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.vertices + 1*3, f3(v, 0.f, 0.f, 1.f)) == 1);
+ CHK(f3_eq(desc.vertices + 2*3, f3(v, 0.f, 0.f, 0.f)) == 1);
+ CHK(f3_eq(desc.normals, f3(v, 0.f, -1.f, 0.f)) == 1);
+}
+
+static void
+check_no_seekable_file(struct sstl* sstl, const enum sstl_type type)
+{
+ int fd[2] = {0,0};
+ FILE* fp = NULL;
+ const char* filename = "Pipe";
+ pid_t pid = 0;
+
+ CHK(pipe(fd) == 0);
+ CHK((pid = fork()) != -1);
+
+ if(pid == 0) { /* Child process */
+ CHK(close(fd[0]) == 0); /* Close the unused input stream */
+ CHK(sstl_ref_put(sstl) == RES_OK); /* Release the unused sstl */
+ CHK((fp = fdopen(fd[1], "w")) != NULL);
+ process_write(type, fp, filename);
+ CHK(fclose(fp) == 0);
+ exit(0);
+
+ } else { /* Parent process */
+ CHK(close(fd[1]) == 0); /* Close the unused output stream */
+ CHK(fp = fdopen(fd[0], "r"));
+ process_read(sstl, type, fp, filename);
+ CHK(fclose(fp) == 0);
+ }
+}
+
+/*******************************************************************************
+ * The test
+ ******************************************************************************/
+int
+main(int argc, char** argv)
+{
+ struct sstl* sstl = NULL;
+ (void)argc, (void)argv;
+
+ CHK(sstl_create(NULL, NULL, 3, &sstl) == RES_OK);
+
+ check_api(SSTL_ASCII);
+ check_api(SSTL_BINARY);
+ check_1_triangle(sstl, SSTL_ASCII);
+ check_1_triangle(sstl, SSTL_BINARY);
+ check_tetrahedron(sstl, SSTL_ASCII);
+ check_tetrahedron(sstl, SSTL_BINARY);
+ check_no_seekable_file(sstl, SSTL_ASCII);
+ check_no_seekable_file(sstl, SSTL_BINARY);
+
+ CHK(sstl_ref_put(sstl) == RES_OK);
+ CHK(mem_allocated_size() == 0);
+ return 0;
+}
