| F | |
| facilities, Syslog | |
| family, Resolv | |
| fdrift, Chrony | |
| field | |
| field_int, Channels | |
| field_no_colon, Channels | |
| field_word, Channels | |
| file, Syslog | |
| file_tmpl, Rsyslog | |
| filter | |
| filters, Xymon_Alerting | |
| filters_opt, Xymon_Alerting | |
| flag | |
| flag_filters_opt, Xymon_Alerting | |
| flag_line | |
| flat_literal, LVM | |
| forge, Puppetfile | |
| format | |
| fs_types, Mke2fs | |
| fs_types_entry, Mke2fs | |
| fs_types_record, Mke2fs | |
| fs_types_title, Mke2fs | |
| fspath, BootConf | |
| G | |
| gid, Passwd | |
| glob, Erlang | |
| global_conf, Keepalived | |
| global_defs, Keepalived | |
| global_defs_field, Keepalived | |
| group | |
| H | |
| home, Passwd | |
| host | |
| host_alias, Sudoers | |
| host_flags, Chrony | |
| host_list, Chrony | |
| host_options, Chrony | |
| hostname | |
| hostnames, Syslog | |
| hour, Cron | |
| http_check_field, Keepalived | |
| http_url_check_field, Keepalived | |
| hwcap, Keepalived |
a list of facilities, separated by commas
let facilities = label_opt_list "facility" (store token) comma
let family = let family_entry = Build.flag("inet4"|"inet6") in Build.key_value_line_comment "family" Sep.space (Build.opt_list family_entry Sep.space) comment_eol
fallbackdrift has specific syntax
let fdrift = [ Util.indent . key "fallbackdrift" . space . [ label "min" . store integer ] . space . [ label "max" . store integer ] . eol ]
A generic field
let field (name:string) (sto:regexp) = [ label name . store sto ]
let field (kw:regexp) (sto:lens) = indent . Build.key_value_line_comment kw sep_spc sto comment_eol
A field storing Rx.integer
let field_int (name:string) = field name Rx.integer
A field storing no_colon
let field_no_colon (name:string) = field name no_colon
A field storing Rx.word
let field_word (name:string) = field name Rx.word
a file may start with a “-” meaning it does not gets sync’ed everytime
let file = [ Build.xchgs "-" "no_sync" ]? . [ label "file" . store file_r ]
File action with a specified template
let file_tmpl = Syslog.file . [ label "template" . Util.del_str ";" . store Rx.word ]
One or more filters
let filters = [ label "filters" . Build.opt_list rule_filter ws ]
Zero, one or more filters
let filters_opt = [ label "filters" . (ws . Build.opt_list rule_filter ws)? ]
A simple flag subnode, consisting of a single key
let flag (kw:regexp) = [ key kw ]
A single word
let flag (kw:regexp) = [ indent . key kw . comment_or_eol ]
let flag = Build.flag Rx.word
A flag value
let flag (kw:string) = Build.flag kw
A flag with optional filters
let flag_filters_opt (kw:string) = [ key kw . filters_opt ]
A simple flag line, consisting of a single key
let flag_line (kw:regexp) = [ key kw . eol ]
let flag_line = Build.flag_line Rx.word
A literal without structure
let flat_literal = int|str
a forge entry
let forge = [ Util.indent . key "forge" . Sep.space . Quote.any . Util.eol ]
sun, hesoid
let format = Rx.word
The format recipient definition
let format = kw_word_filters_opt "FORMAT"
A fs_types section
let fs_types = IniFile.record fs_types_title (fs_types_record | comment)
Possible entries under a fs_types_record group
let fs_types_entry =list_sto "features" ([del /\^/ "^" . label "disable"]? . key Rx.word) | list_sto "options" (key Rx.word . Util.del_str "=" . store Rx.word) | entry_sto "lazy_itable_init" ("true"|"false") | entry_sto ("flex_bg_size"|"auto_64-bit_support") Rx.integer
Fs group records under the fs_types section
let fs_types_record = [ label "filesystem" . Util.indent . store Rx.word . del /[ \t]*=[ \t]*\{[ \t]*\n/ " = {\n" . ((Util.indent . (fs_types_entry|common_entry)) | empty | comment)* . del /[ \t]*\}[ \t]*\n/ " }\n" ]
Title for the fs_types section
let fs_types_title = IniFile.title "fs_types"
let fspath = Rx.fspath
pw_gid
let gid = [ label "gid" . store integer . colon ]
Store a glob
let glob = Util.del_str lglob . store /[^\n"]+/ . Util.del_str rglob
A global configuration entry
let global_conf = global_defs | static_routes
A global_defs block
let global_defs = block "global_defs" global_defs_field
Possible fields in the global_defs block
let global_defs_field = let word_re = "smtp_server"|"lvs_id"|"router_id" in let num_re = "smtp_connect_timeout" in block "notification_email" email | field "notification_email_from" sto_email_addr | field word_re sto_word | field num_re sto_num
Format is (GROUP)
let group = [ label "group" . Util.del_str "(" . store identifier_re . Util.del_str ")" ]
let group = [ Util.del_str ":" . label "group" . store no_colon . eol . entry_or_comment* ]
The (ex)?group filter definition
let group = kw_word /(EX)?GROUP/
pw_dir
let home = [ label "home" . sto_to_col? . colon ]
let host = /[^:# \n\t]+/
The (ex)?host filter definition
let host = kw_word /(EX)?HOST/
Host_Alias, see alias_field
let host_alias = alias_entry "Host_Alias" "host" sto_to_com
let host_flags = [ space . key cmd_flags ]
Find all ntp servers/peers and their flags/options
let host_list = [ Util.indent . key server_peer . space . store address_re . ( host_flags | host_options )* . eol ]
let host_options = [ space . key cmd_options . space . store integer ]
let hostname = /[^-:#\(\), \n\t][^:#\(\), \n\t]*/
a program begins with an optional hash, and a + or -
let hostname = [ label "hostname" . opt_hash . ( plus | [ Build.xchgs "-" "reverse" ] ) . hostnames . eol . entries ]
a list of hostnames
let hostnames = label_opt_list_or "hostname" (store Rx.word) comma "*"
let hour = [ label "hour" . store num ]
let http_check_field = let num_re = /connect_(timeout|port)/ | "nb_get_retry" | "delay_before_retry" in field num_re sto_num | block "url" http_url_check_field
let http_url_check_field = let word_re = "digest" in let num_re = "status_code" in let to_eol_re = "path" in field word_re sto_word | field num_re sto_num | field to_eol_re sto_to_eol
let hwcap = let hwcap_val = [ label "bit" . store Rx.integer ] . Sep.space . [ label "name" . store Rx.word ] in Build.key_value_line "hwcap" Sep.space hwcap_val