From e26274430e60b133b93e9b2cef6046ba042a85c2 Mon Sep 17 00:00:00 2001
From: Nathaniel Wesley Filardo <nwfilardo@gmail.com>
Date: Sat, 24 Oct 2020 19:49:37 +0100
Subject: [PATCH] Initial adaptation of nwfnet-sntp to sntppkt

---
 net/nwfnet-sntp.lua | 27 +++++++++++++++++++++++----
 1 file changed, 23 insertions(+), 4 deletions(-)

diff --git a/net/nwfnet-sntp.lua b/net/nwfnet-sntp.lua
index 4020665..f07ba72 100644
--- a/net/nwfnet-sntp.lua
+++ b/net/nwfnet-sntp.lua
@@ -1,8 +1,27 @@
 local function dosntp(server)
-  pcall(sntp.sync,(require "nwfnet").sntp,
-     function(sec,usec,server) rtctime.set(sec,usec); (require"nwfnet"):runnet("sntpsync",sec,usec,server) end,
-     function(err) (require"nwfnet"):runnet("sntperr",err) end
-  )
+  local nwo = OVL and OVL["sntp"]
+
+  if nwo then
+    nwo = nwo()
+    -- new world order?
+    nwo.go((require "nwfnet").sntp, nil,
+      function(res, serv, self)
+	local sec, usec = nil, nil -- rtctime.get()
+        (require"nwfnet"):runnet("sntpsync",sec,usec,serv)
+      end,
+      function(err, srv, rply)
+	if err == "all" then (require"nwfnet"):runnet("sntperr","No SNTP available") end
+      end)
+  elseif sntp then
+    -- old world order
+    local function try()
+    pcall(sntp.sync,(require "nwfnet").sntp,
+      function(sec,usec,server) rtctime.set(sec,usec); (require"nwfnet"):runnet("sntpsync",sec,usec,server) end,
+      function(err) (require"nwfnet"):runnet("sntperr",err) end)
+    end
+    try()
+    cron.schedule("*/5 * * * *", try)
+  end
 end
 
 local self = {}
-- 
2.50.1