45 lines
1.1 KiB
Plaintext
45 lines
1.1 KiB
Plaintext
|
(*
|
||
|
|
Module: Keepalived
|
||
|
|
Parses /etc/ld.so.conf and /etc/ld.so.conf.d/*
|
||
|
|
|
||
|
|
Author: Raphael Pinson <raphink@gmail.com>
|
||
|
|
|
||
|
|
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/ld.so.conf and /etc/ld.so.conf.d/*. See <filter>.
|
||
|
|
|
||
|
|
About: Examples
|
||
|
|
The <Test_Ldso> file contains various examples and tests.
|
||
|
|
*)
|
||
|
|
|
||
|
|
module LdSo =
|
||
|
|
|
||
|
|
autoload xfm
|
||
|
|
|
||
|
|
(* View: path *)
|
||
|
|
let path = [ label "path" . store /[^# \t\n][^ \t\n]*/ . Util.eol ]
|
||
|
|
|
||
|
|
(* View: include *)
|
||
|
|
let include = Build.key_value_line "include" Sep.space (store Rx.fspath)
|
||
|
|
|
||
|
|
(* View: hwcap *)
|
||
|
|
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
|
||
|
|
|
||
|
|
(* View: lns *)
|
||
|
|
let lns = (Util.empty | Util.comment | path | include | hwcap)*
|
||
|
|
|
||
|
|
(* Variable: filter *)
|
||
|
|
let filter = incl "/etc/ld.so.conf"
|
||
|
|
. incl "/etc/ld.so.conf.d/*"
|
||
|
|
. Util.stdexcl
|
||
|
|
|
||
|
|
let xfm = transform lns filter
|