lenses/sssd.aug

   1 (*
   2 Module Sssd
   3   Lens for parsing sssd.conf
   4
   5 Author: Erinn Looney-Triggs <erinn.looneytriggs@gmail.com>
   6
   7 About: License
   8   This file is licensed under the LGPL v2+, like the rest of Augeas.
   9
  10 About: Configuration files
  11    This lens applies to /etc/sssd/sssd.conf. See <filter>.
  12 *)
  13
  14 module Sssd =
  15   autoload xfm
  16
  17 let comment  = IniFile.comment /[#;]/ "#"
  18
  19 let sep      = IniFile.sep "=" "="
  20
  21 let entry    = IniFile.indented_entry IniFile.entry_re sep comment
  22
  23 (* View: title
  24     An sssd.conf section title *)
  25 let title   = IniFile.indented_title_label "target" IniFile.record_label_re
  26
  27 (* View: record
  28     An sssd.conf record *)
  29 let record  = IniFile.record title entry
  30
  31 (* View: lns
  32     The sssd.conf lens *)
  33 let lns    = ( comment | IniFile.empty )* . (record)*
  34
  35 (* View: filter *)
  36 let filter = (incl "/etc/sssd/sssd.conf")
  37
  38 let xfm = transform lns filter
  39