/usr/share/augeas/lenses/dist/sysconfig.aug is in augeas-lenses 1.2.0-0ubuntu1.
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 | (* Variation of the Shellvars lens *)
(* Supports only what's needed to handle sysconfig files *)
(* Modified to strip quotes. In the put direction, add double quotes *)
(* around values that need them *)
(* To keep things simple, we also do not support shell variable arrays *)
module Sysconfig =
let eol = Shellvars.eol
let semicol_eol = Shellvars.semicol_eol
let key_re = Shellvars.key_re
let eq = Util.del_str "="
let eol_for_comment = del /([ \t]*\n)([ \t]*(#[ \t]*)?\n)*/ "\n"
let comment = Util.comment_generic_seteol /[ \t]*#[ \t]*/ "# " eol_for_comment
let comment_or_eol = Shellvars.comment_or_eol
let empty = Util.empty
let bchar = /[^; \t\n"'\\]|\\\\./ (* " Emacs, relax *)
let qchar = /["']/ (* " Emacs, relax *)
(* We split the handling of right hand sides into a few cases:
* bare - strings that contain no spaces, optionally enclosed in
* single or double quotes
* quot - strings that must be enclosed in single or double quotes
* dquot - strings that contain at least one space or apostrophe,
* which must be enclosed in double quotes
* squot - strings that contain an unescaped double quote
*)
let bare = Quote.do_quote_opt (store bchar+)
let quot =
let word = bchar* . /[; \t]/ . bchar* in
Quote.do_quote (store word+)
let dquot =
let char = /[^"\\]|\\\\./ in (* " *)
let word = char* . "'" . char* in
Quote.do_dquote (store word+)
let squot =
(* We do not allow escaped double quotes in single quoted strings, as *)
(* that leads to a put ambiguity with bare, e.g. for the string '\"'. *)
let char = /[^'\\]|\\\\[^"]/ in (* " *)
let word = char* . "\"" . char* in
Quote.do_squote (store word+)
let export = Shellvars.export
let kv (value:lens) = [ export? . key key_re . eq . value . comment_or_eol ]
let assign =
let nothing = del /(""|'')?/ "" . value "" in
kv nothing | kv bare | kv quot | kv dquot | kv squot
let var_action = Shellvars.var_action
let unset = var_action "unset"
let bare_export = var_action "export"
let source = Shellvars.source
let lns = empty* . (comment | source | assign | unset | bare_export)*
(*
Examples:
abc -> abc -> abc
"abc" -> abc -> abc
"a b" -> a b -> "a b"
'a"b' -> a"b -> 'a"b'
*)
|