03/03: hydra: honeycomb: Allow root logins from 10.0.0.1.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository maintenance.

commit b0661cc7d6dd74b0aeac3b052a80a8a2fef2af9c
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Sat Jun 11 23:17:23 2022 +0200

    hydra: honeycomb: Allow root logins from 10.0.0.1.
    
    * hydra/modules/sysadmin/honeycomb.scm (honeycomb-system): Add 'Match'
    block in 'openssh-configuration'.
---
 hydra/modules/sysadmin/honeycomb.scm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/hydra/modules/sysadmin/honeycomb.scm 
b/hydra/modules/sysadmin/honeycomb.scm
index 24a630d..14b7e09 100644
--- a/hydra/modules/sysadmin/honeycomb.scm
+++ b/hydra/modules/sysadmin/honeycomb.scm
@@ -237,9 +237,13 @@ TIMEOUT ~a~%"
                                   ("rekado" ,(local-file 
"../../keys/ssh/rekado.pub"))
                                   ("mathieu" ,(local-file 
"../../keys/ssh/mathieu.pub"))
                                   ("maxim" ,(local-file 
"../../keys/ssh/maxim.pub"))))
+                               ;; Allow root login from berlin.guix.gnu.org
+                               ;; for deployment purposes.
                                (extra-content "\
 Match Address 141.80.167.131
-  PermitRootLogin yes")))
+  PermitRootLogin yes
+Match Address 10.0.0.1
+  PermitRootLogin yes\n")))
                      (service agetty-service-type
                               (agetty-configuration
                                (tty "ttyAMA0")