/usr/share/augeas/lenses/dist/mke2fs.aug is in augeas-lenses 1.2.0-0ubuntu1.3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 | (*
Module: Mke2fs
Parses /etc/mke2fs.conf
Author: Raphael Pinson <raphink@gmail.com>
About: Reference
This lens tries to keep as close as possible to `man 5 mke2fs.conf` where possible.
About: License
This file is licenced under the LGPL v2+, like the rest of Augeas.
About: Lens Usage
To be documented
About: Configuration files
This lens applies to /etc/mke2fs.conf. See <filter>.
*)
module Mke2fs =
autoload xfm
(************************************************************************
* Group: USEFUL PRIMITIVES
*************************************************************************)
(* View: comment *)
let comment = IniFile.comment IniFile.comment_re IniFile.comment_default
(* View: sep *)
let sep = IniFile.sep /=[ \t]*/ "="
(* View: empty *)
let empty = IniFile.empty
(************************************************************************
* Group: RECORD TYPES
*************************************************************************)
(* View: entry
A generic entry for lens lns *)
let entry (kw:regexp) (lns:lens) = Build.key_value_line kw sep lns
(* View: list_sto
A list of values with given lens *)
let list_sto (kw:regexp) (lns:lens) = counter "item" .
entry kw
(Build.opt_list
[lns]
Sep.comma)
(* View: entry_sto
Store a regexp as entry value *)
let entry_sto (kw:regexp) (val:regexp) = entry kw (store val)
(************************************************************************
* Group: COMMON ENTRIES
*************************************************************************)
(* View: common_entry
Entries shared between <defaults> and <fs_types> sections *)
let common_entry = list_sto ("base_features"|"default_features")
(key Rx.word)
| entry_sto "blocksize" ("-"? . Rx.integer)
| entry_sto "hash_alg" ("legacy"|"half_md4"|"tea")
| entry_sto ("inode_ratio"|"inode_size") Rx.integer
(************************************************************************
* Group: DEFAULTS SECTION
*************************************************************************)
(* View: defaults_entry
Possible entries under the <defaults> section *)
let defaults_entry = entry_sto "force_undo" ("true"|"false")
| entry_sto "fs_type" Rx.word
| entry_sto "undo_dir" Rx.fspath
| list_sto "default_mntopts" (key Rx.word)
| entry_sto "enable_periodic_fsck" Rx.integer
(* View: defaults_title
Title for the <defaults> section *)
let defaults_title = IniFile.title "defaults"
(* View: defaults
A defaults section *)
let defaults = IniFile.record defaults_title
((Util.indent . (defaults_entry|common_entry)) | comment)
(************************************************************************
* Group: FS_TYPES SECTION
*************************************************************************)
(* View: fs_types_entry
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
(* View: fs_types_record
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" ]
(* View: fs_types_title
Title for the <fs_types> section *)
let fs_types_title = IniFile.title "fs_types"
(* View: fs_types
A fs_types section *)
let fs_types = IniFile.record fs_types_title
(fs_types_record | comment)
(************************************************************************
* Group: LENS AND FILTER
*************************************************************************)
(* View: lns
The mke2fs lens
*)
let lns = (empty|comment)* . (defaults|fs_types)*
(* Variable: filter *)
let filter = incl "/etc/mke2fs.conf"
let xfm = transform lns filter
|