Revision 844eff86

b/Ganeti/HTools/Node.hs
30 30
           t_dsk, f_dsk,
31 31
           t_cpu, u_cpu,
32 32
           p_mem, p_dsk, p_rem, p_cpu,
33
           m_dsk, m_cpu,
33 34
           plist, slist, offline)
34 35
    , List
35 36
    -- * Constructor
......
43 44
    , setFmem
44 45
    , setPri
45 46
    , setSec
47
    , setMdsk
48
    , setMcpu
46 49
    , addCpus
47 50
    -- * Instance (re)location
48 51
    , removePri
......
88 91
                 , p_dsk :: Double -- ^ Percent of free disk
89 92
                 , p_rem :: Double -- ^ Percent of reserved memory
90 93
                 , p_cpu :: Double -- ^ Ratio of virtual to physical CPUs
94
                 , m_dsk :: Double -- ^ Minimum free disk ratio
95
                 , m_cpu :: Double -- ^ Max ratio of virt-to-phys CPUs
91 96
                 , offline :: Bool -- ^ Whether the node should not be used
92 97
                                   -- for allocations and skipped from
93 98
                                   -- score computations
......
140 145
      p_rem = 0,
141 146
      p_cpu = 0,
142 147
      offline = offline_init,
143
      x_mem = 0
148
      x_mem = 0,
149
      m_dsk = -1,
150
      m_cpu = -1
144 151
    }
145 152

  
146 153
-- | Changes the index.
......
163 170
setXmem :: Node -> Int -> Node
164 171
setXmem t val = t { x_mem = val }
165 172

  
173
-- | Sets the max disk usage ratio
174
setMdsk :: Node -> Double -> Node
175
setMdsk t val = t { m_dsk = val }
176

  
177
-- | Sets the max cpu usage ratio
178
setMcpu :: Node -> Double -> Node
179
setMcpu t val = t { m_cpu = val }
180

  
166 181
-- | Computes the maximum reserved memory for peers from a peer map.
167 182
computeMaxRes :: PeerMap.PeerMap -> PeerMap.Elem
168 183
computeMaxRes new_peers = PeerMap.maxElem new_peers

Also available in: Unified diff