Revision 57f07ff2 htools/Ganeti/HTools/Loader.hs

b/htools/Ganeti/HTools/Loader.hs
34 34
    , lookupInstance
35 35
    , lookupGroup
36 36
    , commonSuffix
37
    , RelocMode(..)
38
    , EvacMode(..)
39 37
    , RqType(..)
40 38
    , Request(..)
41 39
    , ClusterData(..)
......
67 65

  
68 66
-- * Types
69 67

  
70
-- | The iallocator multi-evac group mode type.
71
data RelocMode = KeepGroup
72
               | ChangeGroup [Gdx]
73
               | AnyGroup
74
                 deriving (Show, Read)
75

  
76 68
{-| The iallocator request type.
77 69

  
78 70
This type denotes what request we got from Ganeti and also holds
......
84 76
    | Relocate Idx Int [Ndx]         -- ^ Move an instance to a new
85 77
                                     -- secondary node
86 78
    | Evacuate [Ndx]                 -- ^ Evacuate nodes
87
    | MultiReloc [Idx] RelocMode     -- ^ Multi-relocate mode
79
    | ChangeGroup [Gdx] [Idx]        -- ^ Multi-relocate mode
88 80
    | NodeEvacuate [Idx] EvacMode    -- ^ node-evacuate mode
89 81
    deriving (Show, Read)
90 82

  

Also available in: Unified diff