From 86595977d761baa67c1462efd59a6404b56205ad Mon Sep 17 00:00:00 2001
From: Michael Forney <mforney@mforney.org>
Date: Sun, 24 Sep 2017 12:04:42 -0700
Subject: tz: Write tzdata hash script in lua

This should make it easier to support the users `config.fs`.
---
 pkg/tz/tzdata.lua | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 pkg/tz/tzdata.lua

(limited to 'pkg/tz/tzdata.lua')

diff --git a/pkg/tz/tzdata.lua b/pkg/tz/tzdata.lua
new file mode 100644
index 00000000..4de07e82
--- /dev/null
+++ b/pkg/tz/tzdata.lua
@@ -0,0 +1,18 @@
+local cmd = 'rc ./scripts/hash.rc %s %s share/zoneinfo/%s %s'
+
+repo = arg[1]
+outdir = arg[2]
+for i = 3, #arg do
+	for line in io.lines(arg[i]) do
+		local target, name = line:match('^Link%s+(%g+)%s+(%g+)')
+		if target then
+			target = name:gsub('[^/]+', '..'):sub(1, -3)..target
+			os.execute(cmd:format(repo, 120000, name, target))
+		else
+			name = line:match('^Zone%s+(%g+)')
+			if name then
+				os.execute(cmd:format(repo, 100644, name, outdir..'/'..name))
+			end
+		end
+	end
+end
-- 
cgit v1.2.3