From 9c1831b4d19e2f4e0ba454e219fabff40055744f Mon Sep 17 00:00:00 2001
From: Marek Paśnikowski <marek@marekpasnikowski.pl>
Date: Wed, 25 Mar 2026 16:56:00 +0100
Subject: implement deployment of aisaka

---
 deployment/machine/ssh.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 deployment/machine/ssh.scm

(limited to 'deployment/machine/ssh.scm')

diff --git a/deployment/machine/ssh.scm b/deployment/machine/ssh.scm
new file mode 100644
index 0000000..e7339b1
--- /dev/null
+++ b/deployment/machine/ssh.scm
@@ -0,0 +1,24 @@
+(define-module (deployment machine ssh)
+  #:use-module ((deployment systems aisaka)
+                #:prefix deployment:systems:aisaka:)
+  #:use-module ((gnu machine ssh)
+                #:prefix gnu:machine:ssh:))
+
+(define open-machine-ssh-session*
+  (@@ (gnu machine ssh)
+      open-machine-ssh-session*))
+
+(define-public aisaka-configuration
+  (gnu:machine:ssh:machine-ssh-configuration
+   (host-name         deployment:systems:aisaka:system-name)
+   (system            deployment:systems:aisaka:architecture)
+   (build-locally?    #t)
+   (authorize?        #t)
+   (allow-downgrades? #f)
+   (safety-checks?    #t)
+   (port              22)
+   (user              "marek")
+   (identity          #f)
+   (session           (open-machine-ssh-session* (@@ (gnu machine ssh)
+                                                     this-machine-ssh-configuration)))
+   (host-key          #f)))
-- 
cgit v1.3