3 Parses /etc/rsyslog.conf
5 Author: Raphael Pinson <raphael.pinsons@camptocamp.com>
8 This lens tries to keep as close as possible to `man 5 rsyslog.conf` where possible.
11 This file is licenced under the LGPL v2+, like the rest of Augeas.
16 About: Configuration files
17 This lens applies to /etc/rsyslog.conf. See <filter>.
20 The <Test_Rsyslog> file contains various examples and tests.
26 let macro_rx = /[^,# \n\t][^#\n]*[^,# \n\t]|[^,# \n\t]/
27 let macro = [ key /$[A-Za-z0-9]+/ . Sep.space . store macro_rx . Util.comment_or_eol ]
29 let config_object_param = [ key /[A-Za-z.]+/ . Sep.equal . Quote.dquote
30 . store /[^"]+/ . Quote.dquote ]
31 (* Inside config objects, we allow embedded comments; we don't surface them
32 * in the tree though *)
33 let config_sep = del /[ \t]+|[ \t]*#.*\n[ \t]*/ " "
36 [ key /action|global|input|module|parser|timezone|include/ .
38 config_object_param . ( config_sep . config_object_param )* .
39 Sep.rbracket . Util.comment_or_eol ]
42 Map :omusrmsg: and a list of users, or a single *
44 let omusrmsg = Util.del_str ":omusrmsg:" .
45 Syslog.label_opt_list_or "omusrmsg" (store Syslog.word)
49 File action with a specified template *)
50 let file_tmpl = Syslog.file . [ label "template" . Util.del_str ";" . store Rx.word ]
52 let namedpipe = Syslog.pipe . Sep.space . [ label "pipe" . store Syslog.file_r ]
54 let action = Syslog.action | omusrmsg | file_tmpl | namedpipe
57 An entry contains selectors and an action
59 let entry = [ label "entry" . Syslog.selectors . Syslog.sep_tab .
60 [ label "action" . action ] . Util.eol ]
63 Parses property-based filters, which start with ":" and the property name *)
65 let sep = Sep.comma . Util.del_opt_ws " "
66 in let prop_name = [ Util.del_str ":" . label "property" . store Rx.word ]
67 in let prop_oper = [ label "operation" . store /[A-Za-z!-]+/ ]
68 in let prop_val = [ label "value" . Quote.do_dquote (store /[^\n"]*/) ]
69 in let prop_act = [ label "action" . action ]
70 in [ label "filter" . prop_name . sep . prop_oper . sep . prop_val .
71 Sep.space . prop_act . Util.eol ]
73 let entries = ( Syslog.empty | Syslog.comment | entry | macro | config_object | prop_filter )*
75 let lns = entries . ( Syslog.program | Syslog.hostname )*
77 let filter = incl "/etc/rsyslog.conf"
78 . incl "/etc/rsyslog.d/*"
81 let xfm = transform lns filter