let mask_of_value = function
  | OFF       -> 0x0
  | ON        -> 0x1
  | OVERRIDE  -> 0x2
  | PROTECTED -> 0x4
  | INHERIT   -> 0x8