From 977a5d5f5e021ecdcf22bacb831c5e4042a5c9e5 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Tue, 9 Oct 2018 14:12:38 +0200
Subject: global-functions: move daily psk secrets to global-config

---
 global-functions | 19 ++++---------------
 1 file changed, 4 insertions(+), 15 deletions(-)

(limited to 'global-functions')

diff --git a/global-functions b/global-functions
index 5af2999..e60d28d 100644
--- a/global-functions
+++ b/global-functions
@@ -8,20 +8,7 @@
 :global GeneratePSK do={
   :local date $1;
 
-  # 0-30 for days of month
-  :local secret1 { "Abusive"; "Aggressive"; "Bored"; "Chemical"; "Cold";
-    "Cruel"; "Curved"; "Delightful"; "Discreet"; "Elite"; "Evasive"; "Faded";
-    "Flat"; "Future"; "Grandiose"; "Hanging"; "Humorous"; "Interesting";
-    "Magenta"; "Magnificent"; "Numerous"; "Optimal"; "Pathetic"; "Possessive";
-    "Remarkable"; "Rightful"; "Ruthless"; "Stale"; "Unusual"; "Useless";
-    "Various" }
-  # 0-11 for month of year
-  :local secret2 { "Adhesive"; "Amusing"; "Astonishing"; "Frantic";
-    "Kindhearted"; "Limping"; "Roasted"; "Robust"; "Staking"; "Thundering";
-    "Ultra"; "Unusual" }
-  # 0-6 for days of week
-  :local secret3 { "Belief"; "Button"; "Curtain"; "Edge"; "Jewel"; "String";
-    "Whistle" }
+  :global "daily-psk-secrets";
 
   :local months {
     "jan"; "feb"; "mar"; "apr"; "may"; "jun";
@@ -52,7 +39,9 @@
   :set sum ($sum + $month);
   :set sum ($sum - (($sum / 7) * 7));
 
-  :local return ([ :pick $secret1 ($day - 1) ] . [ :pick $secret2 $month ] . [ :pick $secret3 $sum ]);
+  :local return ([ :pick [ :pick $"daily-psk-secrets" 0 ] ($day - 1) ] . \
+    [ :pick [ :pick $"daily-psk-secrets" 1 ] $month ] . \
+    [ :pick [ :pick $"daily-psk-secrets" 2 ] $sum ]);
 
   :return $return;
 }
-- 
cgit v1.2.3-54-g00ecf