^^&&^^

Edit File: limits.aug

(* Limits module for Augeas
 Author: Free Ekanayaka <free@64studio.com>

Reference: /etc/security/limits.conf

module Limits =

autoload xfm

(************************************************************************
 *                           USEFUL PRIMITIVES
 *************************************************************************)

let eol        = Util.eol
let comment_or_eol = Util.comment_or_eol
let spc        = Util.del_ws_spc
let comment    = Util.comment
let empty      = Util.empty

let sto_to_eol = store /([^ \t\n].*[^ \t\n]|[^ \t\n])/

(************************************************************************
 *                               ENTRIES
 *************************************************************************)

let domain     = label "domain" . store /[%@]?[A-Za-z0-9_.-]+|\*/

let type_re    = "soft"
               | "hard"
               | "-"
let type       = [ label "type" . store type_re ]

let value      = [ label "value" . store /[A-Za-z0-9_.\/-]+/ ]
let entry      = [ domain . spc
                 . type   . spc
                 . item   . spc
                 . value  . comment_or_eol ]

(************************************************************************
 *                                LENS
 *************************************************************************)

let lns        = (comment|empty|entry) *

let filter     = incl "/etc/security/limits.conf"
               . incl "/etc/security/limits.d/*.conf"

let xfm        = transform lns filter