From 7eeb58dab91eeb73d9491a89313bb28aa00ee833 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 20 May 2014 13:37:03 -0400 Subject: fix ssh authorizied_keys --- src/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs b/src/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs index 9754d4f7..ddb61381 100644 --- a/src/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs +++ b/src/Propellor/Property/SiteSpecific/GitAnnexBuilder.hs @@ -72,9 +72,15 @@ cabalDeps = flagFile go cabalupdated go = userScriptProperty builduser ["cabal update && cabal install git-annex --only-dependencies || true"] cabalupdated = homedir ".cabal" "packages" "hackage.haskell.org" "00-index.cache" --- Ensure a ssh key is set up. +-- Ensure a ssh key is set up, and allow it to be used to ssh in sshKeyGen :: Property -sshKeyGen = flagFile gen f +sshKeyGen = combineProperties "sshkeygen" + [ flagFile gen privkey + , flagFile auth authkeys + ] where gen = userScriptProperty builduser ["ssh-keygen -t RSA -N '' -f " ++ f] - f = homedir ".ssh" "id_rsa" + auth = userScriptProperty builduser ["cp " ++ pubkey ++ " " ++ authkeys] + privkey = homedir ".ssh" "id_rsa" + pubkey = privkey ++ ".pub" + authkeys = homedir ".ssh" "authorized_keys" -- cgit v1.2.3