ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 07:26:13 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

ssh: Add Kerberos-support to ssh:// daemon URLs

Browse source 
* guix/ssh.scm (open-ssh-session): Fall back to GSSAPI if public key
authentication does not work

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Lars-Dominik Braun 2020-02-19 11:13:54 +01:00 committed by Ludovic Courtès
parent ef30ddb2c2
commit 35f3511167
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 13 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
doc/guix.texi
View file

@ -6811,8 +6811,9 @@ instruct it to listen for TCP connections (@pxref{Invoking guix-daemon,
@item ssh
@cindex SSH access to build daemons
These URIs allow you to connect to a remote daemon over
SSH@footnote{This feature requires Guile-SSH (@pxref{Requirements}).}.
A typical URL might look like this:
SSH. This feature requires Guile-SSH (@pxref{Requirements}) and a working
@code{guile} binary in @code{PATH} on the destination machine. It supports
public key and GSSAPI authentication. A typical URL might look like this:
@example
ssh://charlie@@guix.example.org:22

15
guix/ssh.scm
View file

@ -157,11 +157,16 @@ (define* (open-ssh-session host #:key user port identity
(session-set! session 'timeout timeout)
session)
(x
(disconnect! session)
(raise (condition
(&message
(message (format #f (G_ "SSH authentication failed for '~a': ~a~%")
host (get-error session)))))))))
(match (userauth-gssapi! session)
('success
(session-set! session 'timeout timeout)
session)
(x
(disconnect! session)
(raise (condition
(&message
(message (format #f (G_ "SSH authentication failed for '~a': ~a~%")
host (get-error session)))))))))))
(x
;; Connection failed or timeout expired.
(raise (condition