Revision 834bea99 src/Ganeti/Query/Network.hs
| b/src/Ganeti/Query/Network.hs | ||
|---|---|---|
| 24 | 24 |
-} |
| 25 | 25 |
|
| 26 | 26 |
module Ganeti.Query.Network |
| 27 |
( NetworkRuntime(..) |
|
| 27 |
( getGroupConnection |
|
| 28 |
, getNetworkUuid |
|
| 29 |
, instIsConnected |
|
| 30 |
, NetworkRuntime(..) |
|
| 28 | 31 |
, networkFieldsMap |
| 29 | 32 |
) where |
| 30 | 33 |
|
| 34 |
-- FIXME: everything except NetworkRuntime(..) and networkFieldsMap |
|
| 35 |
-- is only exported for testing. |
|
| 36 |
|
|
| 31 | 37 |
import qualified Data.Map as Map |
| 32 | 38 |
import Data.Maybe (fromMaybe, mapMaybe) |
| 33 | 39 |
import Data.List (find) |
| ... | ... | |
| 88 | 94 |
networkFieldsMap = |
| 89 | 95 |
Map.fromList $ map (\v@(f, _, _) -> (fdefName f, v)) networkFields |
| 90 | 96 |
|
| 91 |
-- TODO: the following fields are not implemented yet: external_reservations, |
|
| 92 |
-- inst_cnt, inst_list |
|
| 97 |
-- TODO: the following fields are not implemented yet: external_reservations |
|
| 93 | 98 |
|
| 94 | 99 |
-- | Given a network's UUID, this function lists all connections from |
| 95 | 100 |
-- the network to nodegroups including the respective mode and links. |
Also available in: Unified diff