lenses/ceph.aug

   1 (* Ceph module for Augeas
   2  Author: Pavel Chechetin  <pchechetin@mirantis.com>
   3
   4  ceph.conf is a standard INI File with whitespaces in the title.
   5 *)
   6
   7
   8 module Ceph =
   9   autoload xfm
  10
  11 let comment    = IniFile.comment IniFile.comment_re IniFile.comment_default
  12 let sep        = IniFile.sep IniFile.sep_re IniFile.sep_default
  13
  14 let entry_re   = /[A-Za-z0-9_.-][A-Za-z0-9 _.-]*[A-Za-z0-9_.-]/
  15
  16 let entry      = IniFile.indented_entry entry_re sep comment
  17
  18 let title   = IniFile.indented_title IniFile.record_re
  19 let record  = IniFile.record title entry
  20
  21 let lns     = IniFile.lns record comment
  22
  23 let filter = (incl "/etc/ceph/ceph.conf")
  24            . (incl (Sys.getenv("HOME") . "/.ceph/config"))
  25
  26 let xfm = transform lns filter