Some fixes and generic automatonHEADmaster

Signed-off-by: Mattias Andrée <m@maandree.se>

1 files changed, 28 insertions, 0 deletions

diff --git a/libautomata_clone_automaton.c b/libautomata_clone_automaton.c
new file mode 100644
index 0000000..eb772e4
--- /dev/null
+++ b/libautomata_clone_automaton.c
@@ -0,0 +1,28 @@
+/* See LICENSE file for copyright and license details. */
+#include "common.h"
+
+
+int
+libautomata_clone_automaton(const struct libautomata_automaton *automaton, struct libautomata_automaton *clone)
+{
+	clone->nnodes = 0;
+	if (libautomata_grow_automaton(clone, automaton->nnodes))
+		goto fail;
+
+	for (clone->nnodes = 0; clone->nnodes < automaton->nnodes; clone->nnodes++) {
+		if (automaton->nodes[clone->nnodes].clone) {
+			if ((*automaton->nodes[clone->nnodes].clone)(&automaton->nodes[clone->nnodes],
+			                                             &clone->nodes[clone->nnodes]))
+				goto fail;
+		} else {
+			clone->nodes[clone->nnodes] = automaton->nodes[clone->nnodes];
+		}
+	}
+
+	clone->start = &clone->nodes[automaton->start->index];
+	clone->current = &clone->nodes[automaton->current->index];
+	return 0;
+fail:
+	libautomata_destroy_automaton(clone);
+	return -1;
+}