Revision bdd6931c
| b/htools/Ganeti/HTools/Cluster.hs | ||
|---|---|---|
| 864 | 864 |
failOnSecondaryChange mode dt >> |
| 865 | 865 |
fail "Block device relocations not implemented yet" |
| 866 | 866 |
|
| 867 |
nodeEvacInstance _ _ mode (Instance.Instance |
|
| 868 |
{Instance.diskTemplate = dt@DTRbd}) _ _ =
|
|
| 869 |
failOnSecondaryChange mode dt >> |
|
| 870 |
fail "Rbd relocations not implemented yet" |
|
| 871 |
|
|
| 867 | 872 |
nodeEvacInstance nl il ChangePrimary |
| 868 | 873 |
inst@(Instance.Instance {Instance.diskTemplate = DTDrbd8})
|
| 869 | 874 |
_ _ = |
| b/htools/Ganeti/HTools/Types.hs | ||
|---|---|---|
| 120 | 120 |
, ("DTPlain", 'C.dtPlain)
|
| 121 | 121 |
, ("DTBlock", 'C.dtBlock)
|
| 122 | 122 |
, ("DTDrbd8", 'C.dtDrbd8)
|
| 123 |
, ("DTRbd", 'C.dtRbd)
|
|
| 123 | 124 |
]) |
| 124 | 125 |
$(THH.makeJSONInstance ''DiskTemplate) |
| 125 | 126 |
|
Also available in: Unified diff