Add 2019 day 6 solutions

1 files changed, 32 insertions, 0 deletions

diff --git a/2019/06/puzzle-2.awk b/2019/06/puzzle-2.awk
new file mode 100755
index 0000000..3d0e42c
--- /dev/null
+++ b/2019/06/puzzle-2.awk
@@ -0,0 +1,32 @@
+#!/usr/bin/awk -f
+
+function trace_to_com(xs, o)
+{
+	if (o == "COM")
+		return
+	o = orbits[o]
+	xs[length(xs) + 1] = o
+	trace_to_com(xs, o)
+}
+
+BEGIN { FS = ")" }
+
+{ orbits[$2] = $1 }
+
+END {
+	# Declare ‘xs’ and ‘ys’ as arrays
+	xs[0]; delete xs
+	ys[0]; delete ys
+
+	trace_to_com(xs, "YOU")
+	trace_to_com(ys, "SAN")
+
+	for (i = 1; i <= length(xs); i++) {
+		for (j = 1; j <= length(ys); j++) {
+			if (xs[i] == ys[j]) {
+				print i + j - 2
+				exit
+			}
+		}
+	}
+}
\ No newline at end of file