1 files changed, 32 insertions, 0 deletions
diff --git a/services/nonguix/substitute.scm b/services/nonguix/substitute.scm
new file mode 100644
index 0000000..4cf866a
--- /dev/null
+++ b/services/nonguix/substitute.scm
@@ -0,0 +1,32 @@
+(define-module (services nonguix substitute)
+  #:use-module (gnu services base)
+  #:use-module (guix gexp))
+
+;; DATA
+
+(define nonguix-authorized-guix-key-content
+  (string-append "(public-key \n"
+		 "(ecc \n"
+		 "(curve Ed25519) \n"
+		 "(q #C1FD53E5D4CE971933EC50C9F307AE2171A2D3B52C804642A7A35F84F3A4EA98#))) \n"))
+
+(define nonguix-authorized-guix-key-name
+  "nonguix-authorized-guix-key")
+
+(define nonguix-substitute-urls
+  (list "https://substitutes.nonguix.org"))
+
+;; ABSTRACTION 1
+
+(define nonguix-authorized-guix-keys
+  (list (plain-file nonguix-authorized-guix-key-name
+		    nonguix-authorized-guix-key-content)))
+
+;; PUBLIC
+
+(define-public (nonguix-substitute config)
+  (guix-configuration (inherit config)
+		      (substitute-urls (append %default-substitute-urls
+					       nonguix-substitute-urls))
+		      (authorized-keys (append %default-authorized-guix-keys
+					       nonguix-authorized-guix-keys))))