word: maintain wordlist in postgres database

[sheet.git] / tools / mkwordlist

diff --git a/tools/mkwordlist b/tools/mkwordlist
new file mode 100755 (executable)
index 0000000..bec1362
--- /dev/null
+++ b/tools/mkwordlist
@@ -0,0 +1,8 @@
+#!/bin/sh
+psql sheet -XAt -c "
+       SELECT json_object_agg(coalesce(form, ''), forms)
+               FROM word RIGHT JOIN (
+                       SELECT cat id, array_agg(form ORDER BY form) forms
+                               FROM word WHERE ref IS NULL GROUP BY cat
+               ) sub USING (id)
+" | sed 's/:/=>/g'