M | |
machine, BootConf | |
macro | |
macro_def, NagiosConfig | |
macrodefinition, Xymon_Alerting | |
mail, Xymon_Alerting | |
make_value, Erlang | |
makestep, Chrony | |
map_entry, Nslcd | |
map_format, Automaster | |
map_generic, Automaster | |
map_ldap, Automaster | |
map_ldap_name, Automaster | |
map_line, Grub | |
map_mount, Automaster | |
map_name | |
map_type, Automaster | |
mapped_entry, Nslcd | |
marker, Known_Hosts | |
maxchange, Chrony | |
member, Gshadow | |
member_list, Gshadow | |
menu_entry, Grub | |
menu_error, Grub | |
menu_setting, Grub | |
metadata, Puppetfile | |
method, Pg_Hba | |
minute, Cron | |
misc_check_field, Keepalived | |
mod, Puppetfile | |
mode, Tmpfiles | |
modpath, Solaris_System | |
module_line, Grub | |
moduledir, Puppetfile | |
month, Cron | |
mount_max, Fuse | |
multi_empty, Up2date | |
multi_entry, Up2date | |
multi_single, Up2date | |
multi_value, Up2date | |
multi_values, Up2date | |
multiboot_arg, Grub | |
N | |
name | |
name_re, AptConf | |
name_re_colons, AptConf | |
named_block | |
named_block_arg, Keepalived | |
named_block_arg_title, Keepalived | |
nameserver, Resolv | |
negate_node, Sudoers | |
negate_or_value, Sudoers | |
netgroup, Access | |
netmask, Resolv | |
nexthop, Postfix_Transport | |
nexthop_smtp, Postfix_Transport | |
no_colon, Channels | |
no_semicolon, Channels | |
nocull, Cachefilesd | |
nondef, LVM | |
notice, Xymon_Alerting | |
number, Postgresql |
machine [command]
let machine = let machine_entry = Build.key_value ("comaddr"|"memory") space (store word) | Build.flag ("diskinfo"|"regs") in Build.key_value_line "machine" space (Build.opt_list machine_entry space)
let macro = [ Util.indent . macro_def . Util.eol ]
The macro recipient definition
let macro = [ key /\$[^ =\t\n#\/]+/ . filters_opt ]
Macro line, as used in resource.cfg
let macro_def = let macro = /\$[A-Za-z0-9]+\$/ in let macro_decl = Rx.word | Rx.fspath in key macro . Sep.space_equal . store macro_decl
A string that starts with $ and that is assigned something
let macrodefinition = [ key /\$[^ =\t\n#\/]+/ . Sep.space_equal . store Rx.space_in . eol ]
The mail recipient definition
let mail = [ key "MAIL" . ws . store_word . filters_opt ]
Make a “value” subnode for arrays/tuples
let make_value (lns:lens) = [ label "value" . lns ]
makestep has specific syntax
let makestep = [ Util.indent . key "makestep" . space . [ label "threshold" . store number ] . space . [ label "limit" . store integer ] . eol ]
A map entry as in `map MAP ATTRIBUTE NEWATTRIBUTE`.
let map_entry = [ key "map" . spc . [ key map_names . spc . [ key key_name . spc . store Rx.no_spaces ] ] .eol ]
let map_format = [ label "format" . store format ]
Used for all except LDAP maps which are parsed further
let map_generic = ( map_type . ( Sep.comma . map_format )? . Sep.colon )? . map_name
let map_ldap = [ label "type" . store "ldap" ] . ( Sep.comma . map_format )? . Sep.colon . map_ldap_name
Split up host:dc=foo into host/map nodes
let map_ldap_name = ( [ label "host" . store host ] . Sep.colon )? . [ label "map" . store dn ]
let map_line = [ command "map" "\t" . spc . [ label "from" . store /[()A-za-z0-9]+/ ] . spc . [ label "to" . store /[()A-za-z0-9]+/ ] . eol ]
Mountpoint and whitespace, followed by the map info
let map_mount = [ seq "map" . store mount . Util.del_ws_tab . ( map_generic | map_ldap ) . ( Util.del_ws_spc . comma_spc_sep_list "opt" )? . Util.eol ]
let map_name = [ label "map" . store name ]
let map_name = /[^: \t\n]+/
let map_type = [ label "type" . store type ]
A mapped configuration as in `filter MAP option`.
let mapped_entry (kw:string) (sto:regexp) = [ key kw . spc . Build.key_value_line map_names spc (store sto) ]
The marker is optional, but if it is present then it must be one of â@cert-authorityâ, to indicate that the line contains a certification authority (CA) key, or â@revokedâ, to indicate that the key contained on the line is revoked and must not ever be accepted.
let marker = [ key /@(revoked|cert-authority)/ . Sep.space ]
maxchange has specific syntax
let maxchange = [ Util.indent . key "maxchange" . space . [ label "threshold" . store number ] . space . [ label "delay" . store integer ] . space . [ label "limit" . store integer ] . eol ]
let member = [ label "member" . store word ]
the member list is a comma separated list of users allowed to chgrp to the group without being prompted for the group’s password
let member_list = Build.opt_list member comma
let menu_entry = kw_menu_arg "default" | kw_menu_arg "fallback" | kw_pres "hiddenmenu" | kw_menu_arg "timeout" | kw_menu_arg "splashimage" | kw_menu_arg "gfxmenu" | kw_menu_arg "foreground" | kw_menu_arg "background" | kw_menu_arg "verbose" | kw_menu_arg "boot" (* only for CLI, ignored in conf *) | serial | terminal | password_arg | color | device | setkey
Accept lines not matching menu_entry and stuff them into ‘#error’ nodes
let menu_error = let kw = /default|fallback|hiddenmenu|timeout|splashimage|gfxmenu/ |/foreground|background|verbose|boot|password|title/ |/serial|setkey|terminal|color|device/ in error kw
a valid menu setting or a line that looks like one but is an #error
let menu_setting = menu_entry | menu_error
a metadata entry
let metadata = [ Util.indent . key "metadata" . comment_or_eol ]
can contain an option
let method = [ label "method" . store /[A-Za-z][A-Za-z0-9]+/ . ( Sep.tab . option )* ]
let minute = [ label "minute" . store num ]
let misc_check_field = let flag_re = "misc_dynamic" in let num_re = "misc_timeout" in let to_eol_re = "misc_path" in field num_re sto_num | flag flag_re | field to_eol_re sto_to_eol
a module entry, with optional version and options
let mod = let mod_name = Quote.do_quote (store ((Rx.word . /[\/-]/)? . Rx.word)) in let version = [ label "@version" . Quote.do_quote (store /[^#:\n]+/) . Util.comment_eol? ] in let sto_opt_val = store /[^#"', \t\n][^#"',\n]*[^#"', \t\n]|[^#"', \t\n]/ in let opt = [ Util.del_str ":" . key Rx.word . (del /[ \t]*=>[ \t]*/ " => " . Quote.do_quote_opt sto_opt_val)? ] in let opt_eol = del /([ \t\n]*\n)?/ "" in let opt_space_or_eol = del /[ \t\n]*/ " " in let comma_opt_eol_comment = comma_nospace . (opt_eol . Util.comment_eol)* . opt_space_or_eol in let opts = Build.opt_list opt comma_opt_eol_comment in [ Util.indent . Util.del_str "mod" . seq "mod" . Sep.space . mod_name . (comma_opt_eol_comment . version)? . (comma_opt_eol_comment . opts . Util.comment_eol?)? . Util.eol ]
“-”, or 3-4 bytes.
let mode = /(-|~?[0-7]{3,4})/
Individual moddir search path entry
let modpath = [ seq "modpath" . store /[^ :\t\n]+/ ]
Solaris extension adds module$ and kernel$ for variable interpolation
let module_line = [ command /module\$?/ "\t" . spc . kernel_args ]
The moduledir setting specifies where modules from the Puppetfile will be installed
let moduledir = [ Util.indent . key "moduledir" . Sep.space . quote_to_comment_or_eol ]
let month = [ label "month" . store alphanum ]
let mount_max = Build.key_value_line "mount_max" equal (store Rx.integer)
key=;
let multi_empty = sep_semi
List settings go under a ‘values’ node
let multi_entry = [ label "values" . counter "multi" . ( multi_single | multi_values | multi_empty ) ]
key=foo; (parsed as a list)
let multi_single = multi_value . sep_semi
One value in a list setting
let multi_value = [ seq "multi" . store value_re ]
key=foo;bar key=foo;bar;
let multi_values = multi_value . ( sep_semi . multi_value )+ . del /;?/ ";"
Permits a second form for Solaris multiboot kernels that take a path (with a slash) as their first arg, e.g.
let multiboot_arg = [ label "@path" . store (Rx.word . "/" . Rx.no_spaces) ]
let name = /[^: \t\n]+/
pw_gecos; the user’s full name
let name = [ label "name" . sto_to_col? . colon ]
pw_gecos; the user’s full name
let name = [ label "name" . sto_to_col? . colon ]
Regex for entry names
let name_re = /[A-Za-z][A-Za-z-]*/
Regex for entry names with colons
let name_re_colons = /[A-Za-z][A-Za-z:-]*/
A named block enclosed in brackets
let named_block (kw:regexp) (entry:lens) = [ key kw . block entry . eol ]
A block with a block title and name
let named_block (kw:string) (sto:lens) = lens_block (key kw . sep_spc . sto_word) sto
The named block used for testing
let named_block = Build.named_block "foo" block_entry
A block with a block title, a name and an argument
let named_block_arg (kw:string) (name:string) (arg:string) (sto:lens) = lens_block (named_block_arg_title kw name arg) sto
A title lens for named_block_arg
let named_block_arg_title (kw:string) (name:string) (arg:string) = key kw . sep_spc . [ label name . sto_word ] . sep_spc . [ label arg . sto_word ]
A nameserver entry
let nameserver = Build.key_value_line_comment "nameserver" Sep.space (store Rx.ip) comment_eol
Negation of boolean values for defaults.
let negate_node = [ del "!" "!" . label "negate" ]
A del_negate, followed by either a negated key, or a key/value pair
let negate_or_value (key:lens) (value:lens) = [ del_negate . (negate_node . key | key . value) ]
Format is @NETGROUP[@@NISDOMAIN]
let netgroup = [ label "netgroup" . Util.del_str "@" . store user_re . [ label "nisdomain" . Util.del_str "@@" . store Rx.word ]? ]
A network mask for IP addresses
let netmask = [ label "netmask" . Util.del_str "/" . store Rx.ip ]
let nexthop = let host_re = "[" . Rx.word . "]" | /[A-Za-z]([^\n]*[^ \t\n])?/ in [ label "nexthop" . (store host_re)? ]
let nexthop_smtp = let host_re = "[" . Rx.word . "]" | Rx.word in [ label "host" . store host_re ] . colon . [ label "port" . store Rx.integer ]
let no_colon = /[^: \t\n][^:\n]*[^: \t\n]|[^:\n]/
let no_semicolon = /[^;\n]+/
The nocull key has different syntax than the rest
let nocull = /nocull/i
A line that doesn’t contain a statement
let nondef = Util.empty | Util.comment
The notice filter definition
let notice = flag "NOTICE"
Storing number_re, with or without quotes
let number = Quote.do_squote_opt (store number_re)