(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          "./id_ed25519")
   (session           (open-machine-ssh-session* (@@ (gnu machine ssh)
                                                     this-machine-ssh-configuration)))
   (host-key          "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAIM0Eh0q54myeSEironEP9DEKl+ownYuH7oSgAVuLIDNt marek@aisaka")))