Index
$#! · 0-9 · A · B · C · D · E · F · G · H · I · J · K · L · M · N · O · P · Q · R · S · T · U · V · W · X · Y · Z
F
 facilities, Syslog
 FAI_DiskConfig
 family, Resolv
 fdrift, Chrony
 field
 field_int, Channels
 field_no_colon, Channels
 field_word, Channels
 Fields and values, Xorg
 file
 file_r, Syslog
 file_tmpl, Rsyslog
 filesystem, FAI_DiskConfig
 filesystem_kw, FAI_DiskConfig
 filter
 filters
 FILTERS, Xymon_Alerting
 filters_opt, Xymon_Alerting
 Final lense summary, Chrony
 flag
 flag_filters_opt, Xymon_Alerting
 flag_line
 flags, Chrony
 flat_literal, LVM
 Fonts
 forge, Puppetfile
 format
 fs_option, FAI_DiskConfig
 fs_options, FAI_DiskConfig
 fs_types, Mke2fs
 FS_TYPES SECTION, Mke2fs
 fs_types_entry, Mke2fs
 fs_types_record, Mke2fs
 fs_types_title, Mke2fs
 fspath
 full, Test_Puppet_Auth
 Full lens, Test_Xml
 Function, Syslog
 FUNCTIONS, Channels
 Fuse
G
 General strings, Rx
 GENERIC CONSTRUCTIONS
 GENERIC LENSES, IniFile
 Generic primitive definitions, cgrules
 Generic primitives
 generic_entry_re, Xorg
 generic_opt, FAI_DiskConfig
 generic_opt_list, FAI_DiskConfig
 gid, Passwd
 glob, Erlang
 GLOBAL CONFIGURATION, Keepalived
 global_conf, Keepalived
 global_defs, Keepalived
 global_defs_field, Keepalived
 group
 group_record, cgrules
 Grub
 Gshadow
 GtkBookmarks
let facilities = label_opt_list "facility" (store token) comma
a list of facilities, separated by commas
Parses disk_config files for FAI
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
let fdrift = [ Util.indent . key "fallbackdrift" . space . [ label "min" . store integer ] . space . [ label "max" . store integer ] . eol ]
fallbackdrift has specific syntax
let field (name:string) (sto:regexp) = [ label name . store sto ]
A generic field
let field (kw:regexp) (sto:lens) = indent . Build.key_value_line_comment kw sep_spc sto comment_eol
let field_int (name:string) = field name Rx.integer
A field storing Rx.integer
let field_no_colon (name:string) = field name no_colon
A field storing no_colon
let field_word (name:string) = field name Rx.word
A field storing Rx.word
let file = [ Build.xchgs "-" "no_sync" ]? . [ label "file" . store file_r ]
a file may start with a “-” meaning it does not gets sync’ed everytime
let file = "# # Aliases in this file will NOT be expanded in the header from # Mail, but WILL be visible over networks or from /bin/mail. # Basic system aliases -- these MUST be present. mailer-daemon: postmaster postmaster: root # General redirections for pseudo accounts. bin: root , adm, bob daemon: root adm: root file: /var/foo pipe1: |/bin/ls pipe2 : |\"/usr/bin/ls args,\" "
A full configuration file
let file_r = /\/[^ \t\n;]+/
a file begins with a / and get almost anything else after
let file_tmpl = Syslog.file . [ label "template" . Util.del_str ";" . store Rx.word ]
File action with a specified template
let filesystem = [ label "filesystem" . store filesystem_kw ]
let filesystem_kw = "-" | "swap"
Regexps for filesystem
Exclude scripts/executable maps from here
The files parsed by default
File filter
The pbuilder conffiles
The pg_hba.conf conf file
all you need is /etc/syslog.conf
The filter
let filters = "<Chain \"PreCache\"> <Rule \"no_fqdn\"> <Match \"regex\"> Host \"^[^\.]*$\" Invert false </Match> Target \"stop\" </Rule> </Chain> "
let filters = [ label "filters" . Build.opt_list rule_filter ws ]
One or more filters
let filters_opt = [ label "filters" . (ws . Build.opt_list rule_filter ws)? ]
Zero, one or more filters
let flag (kw:regexp) = [ key kw ]
A simple flag subnode, consisting of a single key
let flag (kw:regexp) = [ indent . key kw . comment_or_eol ]
A single word
let flag = Build.flag Rx.word
let flag (kw:string) = Build.flag kw
A flag value
let flag_filters_opt (kw:string) = [ key kw . filters_opt ]
A flag with optional filters
let flag_line (kw:regexp) = [ key kw . eol ]
A simple flag line, consisting of a single key
let flag_line = Build.flag_line Rx.word
let flags = "dumponexit" | "generatecommandkey" | "lock_all" | "noclientlog" | "rtconutc" | "rtcsync"
Options without values
let flat_literal = int|str
A literal without structure
Parses the /etc/fonts directory
let forge = [ Util.indent . key "forge" . Sep.space . Quote.any . Util.eol ]
a forge entry
let format = Rx.word
sun, hesoid
let format = kw_word_filters_opt "FORMAT"
The format recipient definition
let fs_option = [ key /createopts|tuneopts/ . Util.del_str "=\"" . store /[^"\n]*/ . Util.del_str "\"" ]
let fs_options =
An array of fs_options
let fs_types = IniFile.record fs_types_title (fs_types_record | comment)
A fs_types section
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
Possible entries under a fs_types_record group
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" ]
Fs group records under the fs_types section
let fs_types_title = IniFile.title "fs_types"
Title for the fs_types section
let fspath = Rx.fspath
let fspath = Rx.fspath
let fspath = /[^ \t\n]+/
A filesystem path
let full = "path ~ ^/file_(metadata|content)/user_files/ # Set environments environment production, development environment foo method find, search auth yes method save allow /^(.+\.)?example.com$/ allow_ip 192.168.100.0/24 # Added in Puppet 3.0.0 # This overrides the previous auth authenticated any "
Parses /etc/fuse.conf
let generic_entry_re = /[^# \t\n\/]+/ - entries_re
let generic_opt (type:string) (kw:regexp) = [ key type . Util.del_str ":" . store kw ]
A generic key/value option
let generic_opt_list (type:string) (kw:regexp) = [ key type . Util.del_str ":" . counter "locallist" . Build.opt_list [seq "locallist" . store kw] Sep.comma ]
A generic key/list option
let gid = [ label "gid" . store integer . colon ]
pw_gid
let glob = Util.del_str lglob . store /[^\n"]+/ . Util.del_str rglob
Store a glob
let global_conf = global_defs | static_routes
A global configuration entry
let global_defs = block "global_defs" global_defs_field
A 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
Possible fields in the global_defs block
let group = [ label "group" . Util.del_str "(" . store identifier_re . Util.del_str ")" ]
Format is (GROUP)
let group = [ Util.del_str ":" . label "group" . store no_colon . eol . entry_or_comment* ]
let group = kw_word /(EX)?GROUP/
The (ex)?group filter definition
let group_record = generic_record "group" (Util.del_str "@" . store name)
Parses grub configuration
Parses /etc/gshadow
Parses $HOME/.gtk-bookmarks
Close