Revision 11e90588 src/Ganeti/Query/Network.hs
| b/src/Ganeti/Query/Network.hs | ||
|---|---|---|
| 46 | 46 |
import Ganeti.Query.Common |
| 47 | 47 |
import Ganeti.Query.Types |
| 48 | 48 |
import Ganeti.Types |
| 49 |
import Ganeti.Utils (b64StringToBitString) |
|
| 49 | 50 |
|
| 50 | 51 |
-- | There is no actual runtime. |
| 51 | 52 |
data Runtime = Runtime |
| ... | ... | |
| 175 | 176 |
getExtReservationsString :: Network -> ResultEntry |
| 176 | 177 |
getExtReservationsString net = |
| 177 | 178 |
let addrs = getReservations (networkNetwork net) |
| 178 |
(fromMaybe "" $ networkExtReservations net) |
|
| 179 |
(b64StringToBitString $ fromMaybe "" $ networkExtReservations net)
|
|
| 179 | 180 |
in rsNormal . intercalate ", " $ map show addrs |
| 180 | 181 |
|
| 181 | 182 |
-- | Dummy function for collecting live data (which networks don't have). |
Also available in: Unified diff