| Server IP : 85.214.239.14 / Your IP : 13.59.67.189 Web Server : Apache/2.4.62 (Debian) System : Linux h2886529.stratoserver.net 4.9.0 #1 SMP Tue Jan 9 19:45:01 MSK 2024 x86_64 User : www-data ( 33) PHP Version : 7.4.18 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare, MySQL : OFF | cURL : OFF | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : OFF Directory : /proc/3/cwd/proc/3/cwd/usr/share/augeas/lenses/dist/ |
Upload File : |
(*
Module: Schroot
Parses /etc/schroot/schroot.conf
Author: Raphael Pinson <raphink@gmail.com>
About: Reference
This lens tries to keep as close as possible to `man 5 schroot.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/schroot/schroot.conf. See <filter>.
*)
module Schroot =
autoload xfm
(************************************************************************
* Group: USEFUL PRIMITIVES
*************************************************************************)
(* View: comment
An <IniFile.comment> entry *)
let comment = IniFile.comment "#" "#"
(* View: sep
An <IniFile.sep> entry *)
let sep = IniFile.sep "=" "="
(************************************************************************
* Group: ENTRIES
*************************************************************************)
(* View: description
Descriptions are special entries, which can have an optional lang parameter *)
let description =
let lang = [ Util.del_str "[" . label "lang"
. store IniFile.entry_re . Util.del_str "]" ]
in IniFile.entry_generic_nocomment (key "description" . lang?) sep "#" comment
(* View: entry
An <IniFile.entry>, or <description> *)
let entry = IniFile.entry (IniFile.entry_re - "description") sep comment
| description
(* View: title
An <IniFile.title> *)
let title = IniFile.title IniFile.record_re
(* View: record
An <IniFile.record> *)
let record = IniFile.record title entry
(* View: lns
An <IniFile.lns> *)
let lns = IniFile.lns record comment
(* View: filter *)
let filter = (incl "/etc/schroot/schroot.conf")
let xfm = transform lns filter