Revision 53753d20 src/Ganeti/DataCollectors/CLI.hs
b/src/Ganeti/DataCollectors/CLI.hs | ||
---|---|---|
40 | 40 |
, oConfdAddr |
41 | 41 |
, oConfdPort |
42 | 42 |
, oInputFile |
43 |
, oInstances |
|
43 | 44 |
, genericOptions |
44 | 45 |
) where |
45 | 46 |
|
... | ... | |
67 | 68 |
-- connect to |
68 | 69 |
, optInputFile :: Maybe FilePath -- ^ Path to the file containing the |
69 | 70 |
-- information to be parsed |
71 |
, optInstances :: Maybe FilePath -- ^ Path to the file contained a |
|
72 |
-- serialized list of instances as in: |
|
73 |
-- ([Primary], [Secondary]) |
|
70 | 74 |
} deriving Show |
71 | 75 |
|
72 | 76 |
-- | Default values for the command line options. |
... | ... | |
81 | 85 |
, optConfdAddr = Nothing |
82 | 86 |
, optConfdPort = Nothing |
83 | 87 |
, optInputFile = Nothing |
88 |
, optInstances = Nothing |
|
84 | 89 |
} |
85 | 90 |
|
86 | 91 |
-- | Abbreviation for the option type. |
... | ... | |
138 | 143 |
"the input FILE", |
139 | 144 |
OptComplFile) |
140 | 145 |
|
146 |
oInstances :: OptType |
|
147 |
oInstances = |
|
148 |
( Option "i" ["instances"] |
|
149 |
(ReqArg (\ f o -> Ok o { optInstances = Just f}) "FILE") |
|
150 |
"the FILE containing serialized instances", |
|
151 |
OptComplFile) |
|
152 |
|
|
141 | 153 |
-- | Generic options. |
142 | 154 |
genericOptions :: [GenericOptType Options] |
143 | 155 |
genericOptions = [ oShowVer |
Also available in: Unified diff