Add guix-hpc7 machine.

* guix-hpc7.scm, guix/keys/guix-hpc.pub: New files.
* head-node.scm, build-node.scm: Add key file entry for guix-hpc7.
* deploy.scm: Add entry for guix-hpc7.

build-node.scm

@@ -27,7 +27,8 @@
                                        (local-file "guix/keys/guix-hpc3.pub")
                                        (local-file "guix/keys/guix-hpc4.pub")
                                        (local-file "guix/keys/guix-hpc5.pub")
-                                       (local-file "guix/keys/guix-hpc6.pub"))
+                                       (local-file "guix/keys/guix-hpc6.pub")
+                                       (local-file "guix/keys/guix-hpc7.pub"))
                                  (guix-configuration-authorized-keys config)))
                         (build-accounts 40)
 

deploy.scm

@@ -59,4 +59,13 @@
                        (system "x86_64-linux")
                        (host-name "guix-hpc6")
                        (host-key
-                        "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAIG2wXmXULCOeYKanz+HuHYRfv1SU/EEZ5/E+0Hy1eCl0 root@(none)")))))
+                        "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAIG2wXmXULCOeYKanz+HuHYRfv1SU/EEZ5/E+0Hy1eCl0 root@(none)"))))
+
+      (machine
+       (operating-system (load-operating-system "guix-hpc7.scm"))
+       (environment managed-host-environment-type)
+       (configuration (machine-ssh-configuration
+                       (system "x86_64-linux")
+                       (host-name "guix-hpc7")
+                       (host-key
+                        "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAIOyhK3PjJ1aKtkOHoBUke0dqKAtBbh1rqAh9W7W0qLRp root@(none)")))))

guix-hpc7.scm

+;;; Configuration of the guix-hpc7 build node.
+
+(use-modules (gnu))
+
+(let ((base-os (load "build-node.scm")))
+  (operating-system
+    (inherit base-os)
+    (host-name "guix-hpc7")
+
+    ;; This is a BIOS setup.
+    (bootloader (bootloader-configuration
+                 (bootloader grub-bootloader)
+                 (targets (list "/dev/sda"))))
+
+    (initrd-modules (append (list "megaraid_sas")
+                            %base-initrd-modules))
+
+    (file-systems (append (list (file-system
+                                  (mount-point "/")
+                                  (device (uuid "3ad202ec-8f8b-4b78-a7f8-dd1fab1aa92c"
+                                                'ext4))
+                                  (type "ext4")))
+                          %base-file-systems))
+
+    (swap-devices (list (swap-space
+                         (target (uuid "bc85fc8b-daf9-4edd-b717-83591355ceb6")))))
+
+    (services
+     ;; Configure networking.
+     (cons  (service static-networking-service-type
+                     (list (static-networking
+                            (addresses (list (network-address
+                                              (device "eno3")
+                                              (value "194.199.1.27/27"))))
+                            (routes (list (network-route
+                                           (destination "default")
+                                           (gateway "194.199.1.30"))))
+                            (name-servers '("193.50.111.150")))))
+
+            (operating-system-user-services base-os)))))

guix/keys/guix-hpc7.pub

+(public-key 
+ (ecc 
+  (curve Ed25519)
+  (q #6E87E9085B6E6C1D18F72727A593AA20BAFBAF715962FD8E31F1BFCB7F48B2CA#)
+  )
+ )
\ No newline at end of file

head-node.scm

@@ -31,7 +31,8 @@
                                        (local-file "guix/keys/guix-hpc3.pub")
                                        (local-file "guix/keys/guix-hpc4.pub")
                                        (local-file "guix/keys/guix-hpc5.pub")
-                                       (local-file "guix/keys/guix-hpc6.pub"))
+                                       (local-file "guix/keys/guix-hpc6.pub")
+                                       (local-file "guix/keys/guix-hpc7.pub"))
                                  (guix-configuration-authorized-keys config)))
                         (build-accounts 60)