diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-01 13:51:58 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-01 13:51:58 -0400 |
| commit | 79cbdf35b1188d83e64a713efa82bc7a0a72a181 (patch) | |
| tree | 4ad96d9fa0d2e61f6cd15a2b635fef67ea7c9bb1 /Propellor/Types.hs | |
| parent | 2c328ad142421302b41bc961aa175f60e27f0ab3 (diff) | |
better method of starting propellor simplesh inside docker
Diffstat (limited to 'Propellor/Types.hs')
| -rw-r--r-- | Propellor/Types.hs | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/Propellor/Types.hs b/Propellor/Types.hs index aef62de4..df139dd6 100644 --- a/Propellor/Types.hs +++ b/Propellor/Types.hs @@ -37,3 +37,23 @@ instance ActionResult Result where getActionResult NoChange = ("unchanged", Dull, Green) getActionResult MadeChange = ("done", Vivid, Green) getActionResult FailedChange = ("failed", Vivid, Red) + +data CmdLine + = Run HostName + | Spin HostName + | Boot HostName + | Set HostName PrivDataField + | AddKey String + | Continue CmdLine + | Chain HostName + | ChainDocker HostName + deriving (Read, Show, Eq) + +-- | Note that removing or changing field names will break the +-- serialized privdata files, so don't do that! +-- It's fine to add new fields. +data PrivDataField + = DockerAuthentication + | SshPrivKey UserName + | Password UserName + deriving (Read, Show, Ord, Eq) |
