[consfigurator] ssh:system-known-host property

[Sean Whitton]

Hello,

On Thu 23 Mar 2023 at 10:14AM -03, David Bremner wrote:

> I have host definition that I cut down to (foo.bar a censored real host name)
>
> (defhost minkowski.local
>     (:deploy ((:ssh :user "root") :sbcl))
>   "workstation"
>   (ssh:system-known-host foo.bar))
>
> When I deploy it with *consfigurator-debug-level* at 4, I get
>
> ;;     minkowski.local :: foo.bar is system known host to ssh client ... ok
>
> There is nothing indented before or after this, so it looks like some
> fast path, but I'm not seeing any changes to /etc/ssh_known_hosts. Any
> ideas how to debug this?

The code that's running is a DEFPROP, %UPDATE-KNOWN-HOSTS in
property/ssh.lisp.  The loop won't do anything if foo.bar doesn't have
SSH keys defined, so first I'd confirm that

    (ssh::get-host-public-keys foo.bar)

returns something.

Otherwise, I would add some debug INFORMAT calls to the loop, or some
calls to BREAK and then use a POSIX connection to deploy, i.e.

    (deploy-these ((:ssh :user "root")) minkowski.local
      (ssh:system-known-host foo.bar))

-- 
Sean Whitton