summaryrefslogtreecommitdiff
path: root/deployment
diff options
context:
space:
mode:
Diffstat (limited to 'deployment')
-rw-r--r--deployment/machine.scm11
-rw-r--r--deployment/machine/ssh.scm18
2 files changed, 29 insertions, 0 deletions
diff --git a/deployment/machine.scm b/deployment/machine.scm
index 28e303b..f8a4112 100644
--- a/deployment/machine.scm
+++ b/deployment/machine.scm
@@ -3,6 +3,8 @@
#:prefix deployment:machine:ssh:)
#:use-module ((deployment systems aisaka)
#:prefix deployment:systems:aisaka:)
+ #:use-module ((deployment systems akashi)
+ #:prefix deployment:systems:akashi:)
#:use-module ((gnu machine)
#:prefix gnu:machine:)
#:use-module ((gnu machine ssh)
@@ -16,3 +18,12 @@
(define-public aisaka
(list aisaka-machine))
+
+(define akashi-machine
+ (gnu:machine:machine
+ (operating-system deployment:systems:akashi:system)
+ (environment gnu:machine:ssh:managed-host-environment-type)
+ (configuration deployment:machine:ssh:akashi-configuration)))
+
+(define-public akashi
+ (list akashi-machine))
diff --git a/deployment/machine/ssh.scm b/deployment/machine/ssh.scm
index b63fde7..edeeffd 100644
--- a/deployment/machine/ssh.scm
+++ b/deployment/machine/ssh.scm
@@ -1,6 +1,8 @@
(define-module (deployment machine ssh)
#:use-module ((deployment systems aisaka)
#:prefix deployment:systems:aisaka:)
+ #:use-module ((deployment systems akashi)
+ #:prefix deployment:systems:akashi:)
#:use-module ((gnu machine ssh)
#:prefix gnu:machine:ssh:))
@@ -22,3 +24,19 @@
(session (open-machine-ssh-session* (@@ (gnu machine ssh)
this-machine-ssh-configuration)))
(host-key "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAIM0Eh0q54myeSEironEP9DEKl+ownYuH7oSgAVuLIDNt marek@aisaka")))
+
+(define-public akashi-configuration
+ (gnu:machine:ssh:machine-ssh-configuration
+ (host-name deployment:systems:akashi:system-name)
+ (system deployment:systems:akashi:architecture)
+ (build-locally? #t)
+ (authorize? #t)
+ (allow-downgrades? #f)
+ (safety-checks? #t)
+ (port 22)
+ (user "marek")
+ (identity "./id_ed25519")
+ (session (open-machine-ssh-session* (@@ (gnu machine ssh)
+ this-machine-ssh-configuration)))
+ (host-key "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAICtEYtiph2TwshHHSQhLL7A2ZvFMCogWuI8vfS3jLQsm marek@akashi")))
+