Revision 02da9d07 Ganeti/HTools/CLI.hs
| b/Ganeti/HTools/CLI.hs | ||
|---|---|---|
| 8 | 8 |
|
| 9 | 9 |
{-
|
| 10 | 10 |
|
| 11 |
Copyright (C) 2009 Google Inc. |
|
| 11 |
Copyright (C) 2009, 2010 Google Inc.
|
|
| 12 | 12 |
|
| 13 | 13 |
This program is free software; you can redistribute it and/or modify |
| 14 | 14 |
it under the terms of the GNU General Public License as published by |
| ... | ... | |
| 60 | 60 |
, oPrintNodes |
| 61 | 61 |
, oQuiet |
| 62 | 62 |
, oRapiMaster |
| 63 |
, oSaveCluster |
|
| 63 | 64 |
, oShowHelp |
| 64 | 65 |
, oShowVer |
| 65 | 66 |
, oTieredSpec |
| ... | ... | |
| 105 | 106 |
, optOffline :: [String] -- ^ Names of offline nodes |
| 106 | 107 |
, optOneline :: Bool -- ^ Switch output to a single line |
| 107 | 108 |
, optOutPath :: FilePath -- ^ Path to the output directory |
| 109 |
, optSaveCluster :: Maybe FilePath -- ^ Save cluster state to this file |
|
| 108 | 110 |
, optShowCmds :: Maybe FilePath -- ^ Whether to show the command list |
| 109 | 111 |
, optShowHelp :: Bool -- ^ Just show the help |
| 110 | 112 |
, optShowInsts :: Bool -- ^ Whether to show the instance map |
| ... | ... | |
| 137 | 139 |
, optOffline = [] |
| 138 | 140 |
, optOneline = False |
| 139 | 141 |
, optOutPath = "." |
| 142 |
, optSaveCluster = Nothing |
|
| 140 | 143 |
, optShowCmds = Nothing |
| 141 | 144 |
, optShowHelp = False |
| 142 | 145 |
, optShowInsts = False |
| ... | ... | |
| 304 | 307 |
(ReqArg (\ m opts -> Ok opts { optMaster = m }) "ADDRESS")
|
| 305 | 308 |
"collect data via RAPI at the given ADDRESS" |
| 306 | 309 |
|
| 310 |
oSaveCluster :: OptType |
|
| 311 |
oSaveCluster = Option "S" ["save"] |
|
| 312 |
(ReqArg (\ f opts -> Ok opts { optSaveCluster = Just f }) "FILE")
|
|
| 313 |
"Save cluster state at the end of the processing to FILE" |
|
| 314 |
|
|
| 307 | 315 |
oShowHelp :: OptType |
| 308 | 316 |
oShowHelp = Option "h" ["help"] |
| 309 | 317 |
(NoArg (\ opts -> Ok opts { optShowHelp = True}))
|
Also available in: Unified diff