propellor

propellor config for hosts.
git clone git://git.ricketyspace.net/propellor.git
Log | Files | Refs | LICENSE

commit 37752b49a6d88677b4790f2a2967cfcba3e522b5
parent ca04b5634870d6e38e42b703b4ff5c7b7a87ecad
Author: rsiddharth <s@ricketyspace.net>
Date:   Thu, 18 Jan 2018 23:03:16 +0000

propellor spin

Diffstat:
config.hs | 24------------------------
1 file changed, 0 insertions(+), 24 deletions(-)

diff --git a/config.hs b/config.hs @@ -112,10 +112,8 @@ cygnus = host "cygnus.ricketyspace.net" $ props & Ssh.userKeyAt (Just sCanonicalSshKeyPath) (User "s") hostContext (SshRsa, sCanonicalSshPubKey) --- crons. - <!> rsyncToChum & rsyncToEntisol & rsyncFromCruxToEntisol - & annexToChum & annexToEntisol & annexSyncFromHome & updateGitAnnex @@ -159,16 +157,6 @@ sourceCygnusEnv :: [Char] -> [Char] sourceCygnusEnv cmd = ". $HOME/.env; " ++ cmd --- backup paths. ----- chum. -chumFilter :: [Char] -chumFilter = "/home/s/v/cygnus.ricketyspace.net/dp/rsync-backup/filter-chum" - -chumBackupPath :: [Char] -chumBackupPath = "/media/s/chum" - -chumAnnexPath :: [Char] -chumAnnexPath = "/media/s/chum/annex/" - ---- entisol. entisolFilter :: [Char] entisolFilter = "/home/s/v/cygnus.ricketyspace.net/dp/rsync-backup/filter-entisol" @@ -200,12 +188,6 @@ annexTo annexPath annexGetPath = "./annex-to " ++ annexPath ++ " " ++ annexGetPath ---- s's crons on cygnus. -rsyncToChum :: Property DebianLike -rsyncToChum = Cron.job "rsync-to-chum" (Cron.Times "*/30 * 15 * *") - (User "s") "/home/s/.bin" rsyncCmd - where - rsyncCmd = rsyncBuTo chumFilter "/home/s" chumBackupPath - rsyncToEntisol :: Property DebianLike rsyncToEntisol = Cron.job "rsync-to-entisol" (Cron.Times "00 02 * * *") (User "s") "/home/s/.bin" rsyncCmd @@ -220,12 +202,6 @@ rsyncFromCruxToEntisol = Cron.job "rsync-from-crux-to-entisol" rsyncCmd = sourceCygnusEnv (rsyncBuTo cruxFilter "rspace:~/" cruxBackupPath) -annexToChum :: Property DebianLike -annexToChum = Cron.job "annex-to-chum" (Cron.Times "00 */1 15 * *") - (User "s") "/home/s/.bin" annexCmd - where - annexCmd = annexTo chumAnnexPath "docs" - annexToEntisol :: Property DebianLike annexToEntisol = Cron.job "annex-to-entisol" (Cron.Times "45 02 * * *") (User "s") "/home/s/.bin" annexCmd